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PREFACE 



This manual was prepared by Programming. Systems 
to provide detailed information on the internal logic 
of the IBM 7030 Master Control Program (MCP). 
It is intended for systems programming personnel 
who are responsible for diagnosing system operation 
or for adapting the programming system to special 
usage. 

Certain knowledge is prerequisite for the full uti- 
lization of this manual. It is assumed that the reader 
has a basic knowledge of the IBM 7030 and its basic 
language, STRAP 11. Such background knowledge can 
be obtained from the IBM 7030 Data Processing Sys- 
tem Reference Manual, Form A22-6530-2, and from 
the IBM Reference Manual, STRAP II 7030 Assembly 
Program, Form C28-6129. It is also assumed that 
the reader has a general knowledge of MCP as des- 
cribed in the IBM 7030 Data Processing System 
Master Control Program Reference Manual, 
Form C22-6678. 
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INTRODUCTION 



The IBM Programming System for the IBM 7030 
Data Processing System consists of the Master Con- 
trol Program (MCP), the assembly program (STRAP 
II), FORTRAN, and the System Macro Language, 
SMAC I. MCP is the system control program; the 
other three programs are language processors. The 
programs constituting the system are described in 
detail in their respective Programming Systems 
Analysis Guides. This manual, then, is one of a set 
of four Analysis Guides which describe the IBM 7030 
Programming System completely. 

How MCP is used with respect to computer opera- 
tions and problem programs is described in the IBM 
7030 Data Processing System Master Control Pro- 
gram Reference Manual, Form C22-6678: Detailed 
information about the functions performed by MCP is 
described in the Analysis Guide, together with mis- 
cellaneous programming information. This, together 
with the program listing, enables the systems pro- 
grammer to determine how MCP accomplishes any 
given task, and to adapt MCP to such special usage 
as the installation may require. The Analysis Guide, 
designed to complement the program listing, is a 
tool for the systems programmer to help him make 
most effective use of the MCP program listing. 



For purposes of exposition, MCP has been divided 
into the following five basic functional areas: 

1. Interrupt control 

2. System operation 

3. System I-O 

4. Service routines 

5. Debugging aids 

Each area is described in a section of the Analysis 
Guide. Additional sections provide a general descrip- 
tion of MCP, and descriptions of the supporting pro- 
grams. 

Flow charts have been included in context for ease 
of reference. They are drawn at a functional level, 
and conform to the standards specified in Appendix 
A. Program symbols are used freely in both the text 
and the flow charts in order to relate the Analysis 
Guide and the listing as closely as possible. 

The subprograms of MCP are closely interrelated. 
In order to avoid diversionary discussions through- 
out the Analysis Guide, each section has been written 
presuming knowledge of the other sections whenever 
necessary. The reader with the responsibilities 
outlined in the preface should read the entire Analy- 
sis Guide once to become familiar with content, 
terminology, and level of discussion, before attempt- 
ing to put it to use. 



Introduction 



GENERAL DESCRIPTION OF MCP 



The Master Control Program (MCP) for the IBM 
7030 is composed of many small programs whose 
overall purpose is to expedite the flow of work 
through the 7030 system. They total approximately 
11,000 words, most of which remain in core storage 
at all times. They rely on a set of supporting pro- 
grams to perform peripheral I-O operations and 
system update. 

THE LOGICAL STRUCTURE OF MCP 

MCP is composed of three kinds of programs: 

1. Interrupt control programs 

2. Service routines 

3. Major packages 

These three categories constitute distinct logical 
levels within MCP. They operate within the frame- 
work of a few basic priority and control concepts. 

Interrupt Control Programs 

One of the design features of the 7030 is its interrupt 
system. MCP takes all interrupts, although some 
may be subsequently routed to a problem program 
(PP). Included in the category of interrupt control 
programs are those programs which receive control 
directly or almost directly from an interrupt table. 
These programs operate with the interrupt system 
disabled, and, except for interrupts due to non-recov- 
erable errors, they route control to some other pro- 
gram. Since MCP uses the IF interrupt as a basic 
means of communication, the interrupt control pro- 
grams concerned with the IF interrupt are referred 
to collectively as the dispatcher . Similarly, the 
interrupt programs concerned with handling I-O 
interrupts are referred to as the receptor . 

Service Routines 

MCP permits the problem program (PP) to use sym- 
bolic I-O, and performs I-O operations on the proper 
unit when requested by the PP. The programs which 
actually accomplish these services (i. e. , read, write, 
rewind, etc.) are called service routines. The group 
of service routines concerned exclusively with sym- 
bolic I-O operations is called the actuator . Additional 
service routines perform such functions as suppression 
and release of I-O interrupts, setting of the interval 
timer, etc. . The service routines may be explicitly 
defined as those routines which accomplish pseudo-ops 
for pseudo-op codes less than 64.0. They operate 



disabled, and are effectively an extension of the 
requesting program. They receive control from the 
dispatcher and return to the point of request. 

Major Packages 

The remaining programs in MCP are major pack- 
ages. In terms of pseudo-ops, a major package is a 
program which services a pseudo-op whose code is 
64.0 or greater. A major package has characteris- 
tics similar to those of a problem program. It may 
operate enabled, may suppress I-O interrupts, may 
perform I-O (but must use symbolic I-O and the serv- 
ice routines), may use other major packages, and 
has priority over a problem program and its inter- 
rupts. A major package may be primed ; that is, 
have its pseudo-op and parameters entered into a 
queue for execution at a later time. 

Program Control and Priority 

MCP receives control only when an interrupt occurs. 
Pseudo-op requests enter MCP via the IF interrupts. 
Since the service routines are considered a logical 
extension of the requesting program (MCP or PP) , it 
is necessary to introduce the concept of level of pro- 
gram operation. The program level, or instruction 
counter owner, is MCP when an MCP major package 
is in control or about to receive control. At all other 
times the level is PP. The system level (SL) bit is 
used by MCP for control logic. Note that the service 
routines operate at either level, depending on the 
level of the program requesting the service pseudo- 
op. Thus, an MCP service routine may be in con- 
trol, but may be operating at PP level. However, 
all portions of MCP in which this is possible (i. e. , 
non- major packages) operate with the interrupt sys- 
tem disabled. 

Interrupts other than IF may occur only while the 
PP or an MCP major package is operating. Consid- 
ering only I-O interrupts, four situations are possible: 

1. An MCP I-O unit interrupts an MCP major 
package. 

2. A PP I-O unit interrupts an MCP major pack- 
age. 

3. An MCP I-O unit interrupts the PP. 

4. A PP I-O unit interrupts the PP. 

These situations may arise in any order and at any 
rate. In addition, one interrupt may immediately 
follow another interrupt, in which case response to 



the second interrupt must be deferred until the re- 
sponse to the first is complete. An I-O interrupt 
stacking mechanism is required, and is provided by 
MCP. 

Because of the functions performed by MCP, the 
MCP program level must have priority over the PP 
level. The PP must not be allowed to interrupt MCP. 
Thus , a stacking mechanism is required for PP 
interrupts occurring at MCP level. 

The MCP receptor places a program (MCP or PP) 
in the auto-stack mode (in Which successive inter- 
rupts are automatically stacked) when it passes an 
I-O interrupt to that program. When the receptor 
receives an I-O interrupt and the program owning 
the interrupt is auto-stacked, or is, by request, 
suppressing I-O interrupts ($SIO) , the interrupt is 
stacked in a queue. Two such queues are main- 
tained: one for PP and one for MCP. Considering 
the SIO mode and the /auto -stack mode as identical , 
the disposition of I-O interrupts may be tabulated as 
shown. 

When a fixup routine (a program responding to an 
I-O interrupt) has finished, control must ultimately 
return to the point of interrupt; however , interven- 
ing interrupts must first be unstacked. Since PP 
interrupts are stacked when the IC is at MCP level, 
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these must be unstacked whenever the level is to 
change to PP. The return service routine ($RET) 
sends control to the proper place. Every fixup 
routine, PP or MCP, and every major package, 
terminates with $RET. The return routine must al- 
so attend to the impriming of primed major packages. 
Consider the sequence of events shown in Figure 1. 

This sequence of events could be further compli- 
cated by adding simultaneous interrupts of different 
levels, and primed major packages. 

In summary, MCP has priority over PP; all MCP 
tasks must be completed before control is given to 
PP. All major transfers of control are the result of 
interrupts: major package to major package, PP to 
major package, major package to PP, mainstream 
to fixup, and fixup to mainstream. 
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General Description of MCP 



PROGRAM ORGANIZATION 

In general, the order of the MCP programs are inter- 
rupt control, service routines, then major packages. 
All of MCP resides permanently on the Permanent 
Read Only Storage Area of the disk (PROSA) . Most 
of it also resides permanently in upper core storage, 
the rest being called in from the disk as needed. 
Some of the part called in from the disk operates in 
the overlay area at the upper end of the permanent 
core storage portion, while part of phase 4 of job 
control operates in PP memory, since it is required 
only between jobs. 

Memory Allocation 

MCP occupies five type areas on PROSA. One is the 
main portion of MCP, the others are major packages 
called into core when required. They are; 
Type Area Content 

IIDIIMCP Main portion of MCP 

22SCOMD Command package 

22 LOADER Loader and resume load 

22$DUMP Debug and dump packages 

22$EOJ JC4, assign move 

An overlay area is provided for major packages 
which are infrequently used, for example, once per 
job. Once a program is in the overlay area, it need 
not be called in again unless it has been overlayed by 
another program. The overlay area is controlled by 
the major package f etcher, a subroutine of JC4, and 
is also used as the buffer for the disk fetch ($FETCH) 
program. 

The core region from the overlay area to the top 
of memory is available for patches and special 
installation packages. 

The MCP Communication Region 

The MCP communication region consists of 14 words 
from SMCP to SMCP + (16)8 reserved for control bits 
and words to be used by any part of MCP. The sym- 
bols associated with this region are listed in the early 
pages of the listing. They are further defined in 
subsequent sections of the Analysis Guide as they 
are used. 

CONTROL OF SYMBOLIC I-O 

To utilize its symbolic 1-0 feature, MCP requires 
the following: 

1. Precise knowledge of the I-O equipment con- 
figuration of the machine. 



2. A mechanism for translating lOD reference 
numbers (logical I-O units) into the specific 
channels and units used to perform I-O requests. 

3. A mechanism for translating a channel and unit 
into an lOD reference number to determine the 
I-O table of exits for which an interrupt is 
intended . 

4. A mechanism which can differentiate between 
interrupts resulting from I-O operations per- 
formed by the owner of a unit and set-up opera- 
tions performed by MCP for the owner of the 
unit. 

5. A bookkeeping system to keep track of activi- 
ties both at the physical unit level and at the 
logical unit level. 

These functions are performed by the I-O control 
tables. MCP uses six distinct types of I-O control 
tables: 

1. A Channel Status Table (CST) exists for each 
channel; it contains the operational status for the 
channel. For single unit channels, the CST also 
contains the operational status of the unit, and locates 
the unit area table. For other channels, the CST 
locates each unit status table. 

2. The Unit Status Table (UST) provides the opera- 
tional status for units on a multi-unit channel. It 
locates the unit area table. Each such unit has a 
UST. 

3. The Unit Area Table (UAT) serves as an inter- 
face between tables oriented toward physical units 
and tables oriented toward logical units. It contains 
current information on unit usage, and locates both 
the file area table and the channel status table. One 
UAT exists for each physical unit defined by lOD's. 

4. A File Area Table (FAT) exists for each logical 
I-O unit: that is, each unit requested by an lOD card. 
The FAT contains information in terms of operations 
on the logical unit. It contains the information from 
the lOD card, and locates the proper entry in the 
symbolic I-O location table. 

5. The Symbolic I-O Location Table contains one 
entry for each lOD reference number. The entry 
locates the UAT and FAT. 

6. The Reel Pool Table is used to record the 

sequence of reels used by a physical unit. It contains 
the labeling information from the REEL cards. 

The channel and unit status tables are originally 
set up by the initialization program at initial pro- 
gram load. They may be changed by the lOCHANGE 
command, and are initialized by job control. They 
are updated by the actuator and receptor. 

The unit and file area tables, along with the sym- 
bolic I-O location table and reel pool table, are set 
up by phase 4 of job control, immediately prior to 
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running a job. The area tables are updated by the 
actuator and receptor. 

The tables may need to be referenced starting 
either with a channel number (as in the receptor) or 
with an lOD reference number (as in the actuator). 
The tables are chained (Figure 2) so that either 



number serves to locate all related tables. The 
channel number locates the CST entry, and the lOD 
reference number locates the proper entry in the 
symbolic I-O location table. These tables are 
defined in detail in Appendix B. 

The basic characteristics of the tables are as 
follows: 
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Figure 2. Inter-Relationship of I-O Control Tables 
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TNTERRTIPT CONTROL 



MCP design is centered around the IBM 7030 inter- 
rupt system. All interrupts are taken by MCP. All 
major transfers of control and all I-O functions 
depend upon the interrupt system and the MCP inter- 
rupt control programs for their success. 

MCP divides the IBM 7030 interrupt ($IND) indica- 
tors into four categories: 

1. The error indicators: 0-3, 5-8, 15-17, 19 

2. The maskable indicators: 4, 18, 20, 22-47 

3. The I-O indicators: 9-13 

4. The IF indicator: 21 

The IF indicator is placed in a category by itself 
because, in addition to indicating a potential error, 
it is used for major transfers of control. 

Figure 3 shows the distribution of interrupts 
among the MCP programs. All interrupts are 
received by the MCP interrupt table and from there, 
control flows to the specified MCP programs. 
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Figure 3. Distribution of Interrupts Among MCP Programs 



THE INTERRUPT TABLES 

MCP provides the following two interrupt tables: 

1. The interrupt table (SIT) 

2. The parallel interrupt table (SIPT) 

All IBM 7030 interrupts are received by the inter- 
rupt table (SIT). It consists of 48 full word instruc- 
tions of the form SIC, ; BD, ; one for each indi- 
cator through 47. Indicator 14 is not used, the 
interrupt table containing two NOP instructions in 
the word corresponding to that indicator. The inter- 
rupt table branches to one of the following three 
basic areas of MCP (Figure 3): 

1. The standard fixups 

2. The parallel interrupt table 

3. The dispatcher 



I-O interrupts are all handled by a common routine, 
as are the maskable interrupts, and control is passed 
to these routines through the parallel interrupt table. 
This permits retaining the identity of the individual 
interrupt while branching to a common routine. 

The parallel interrupt table consists of 48 full 
words. All 48 words are not used, because all inter- 
rupts do not require use of this table. In positions 
corresponding to the maskable indicators, the par- 
allel interrupt table contains the full word instruction 

SIC, ; B, . In positions corresponding to the 

I-O indicators, it contains BZBl, SPSIOI+ (indicator 
number), KSTORE, providing for entry to the recep- 
tor with a bit set corresponding to the interrupt. 

The action taken by the interrupt tables for the 
various interrupts may be tabulated as shown on the 
following page. 

ERROR INTERRUPTS 

MCP divides error interrupts into two groups which 
are both handled by standard fixup routines: 

1. Machine errors (indicators 0-3, 5), prohibiting 
continuation of system operation. 

2. Program errors (indicators 6-8, 15-17, 19), 
prohibiting continuation of the problem program. 
Program errors also prohibit continuation of system 
operation if they occur in MCP. 

Machine Errors 

Indicators MK, IK, IJ, EK, and CPU are set only by 
machine errors. The interrupt table branches to five 
routines all of which are two-word routines of the 
following form: 

YFX** SIC, YMFL 

B, YMFL 

(IQSX) DD (BU), **X 

(** denotes the indicator mnemonic) 
Thus, control passes to a common fixup routine, 
YMFL, with the location of the IQS indicator mnemonic 
in the address of YMFL. This routine hangs up in a 
BD, $ after using the commentator to t3rpe the state- 
ment: 

♦♦INTERRUPT. THE NEXT INSTRUCTION IS A 
BE TO THE INTERRUPTED ADDRESS. 

Program Errors 

Incorrect program action may set indicators EKJ, 
UNRJ, CBJ, OP, AD, USA, and DS. The interrupt 
table will branch to one of seven routines all of which 
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Interrupt 
Category 

ERROR 



MASKABLE 



I-O 



IF 



YMFIC 



Interrupt 
Indicators 

MK,IK,IJ 
EK, CPU. 
(0-3, 5, 
machine 
error) 



EKJ, UNRJ, 
CBJ,OP,AD, 
(6-8, 15-17, 19, 
program 
error) 



TS(4, the only STIC 
asynchronous 
maskable 
interrupt) 



Interrupt Table (SIT) 
SIC IN BD TO 



YSFIC 



All other 

maskable. 

(18,20,22-47) 



STIC 



EPGK, UK, EE STIC 

EOP, CS. 

(9-13) 



IF (21) 



STIC 



YFM** 

(standard 

fixup; ** 

denotes 

indicator 

mnemonic) 

YFM** 

(standard 

fixup; ** 

denotes 

indicator 

mnem.onic) 

SIPT+4.0 



Parallel Interrupt Table (SIPT) 
SIC IN B TO 



SIPT+ 

(indieator 

number) 



SIPT+ 

(indicator 

number) 



SIFAE 

(IF analyzer) 



SINTO 



WINTOR 



Not saved. 
Bit SPSIOI 
+ (indicator 
number) set. 



JWLODE 
(special TS 
interrupt 
routine) 

WLODE 
(maskable 
interrupt 
routine) 

KSTORE 
(receptor) 



are two-word routines of the following form: 
YFX** SIC, YPREL 

B, YPREFX 

(AX)DD(BU, 32), **X 

(IQSX)DD(BU,32), **X 
As in the case of machine errors, control passes 
to a common fixup routine, YPREFX, with a reference 
to the A8 and IQS mnemonic in YPREL. 

If PP generated the interrupt, the common fixup 
routine, after saving low registers in the backup 
buffer (SLRBU) , resets the seven error indicators 
and the EXE and IF indicators. This prevents an 
unanticipated loss of subsequent control. The coded 
indicator mnemonics are placed in PP and MCP error 
messages, and the IC saved in YSFIC is converted to 
A8 and also placed in the PP error message. The 
level bit (SL) is then tested to determine the source 
of the error. 



If the error was caused by PP, ABEOJ is primed, 
the level bit is set to MCP, and the MCP mask and 
boundaries are selected. Control is given to the 
short message routine to write the error message 
and the ABEOJ is unprimed causing the rejection of 
the PP. (See the dispatcher return routine, and the 
short message routine.) 

If the error was caused by MCP, system operation 
cannot be continued. Hardware I-O instructions are 
used to write the IQS error message on the typewriter, 
and a BD, $ is executed. 



MASKABLE INTERRUPTS 

The maskable indicators are used at the option of the 
problem program. They are: 
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Indicator 


Type 


4 


Time Signal (TS) 


18 


Execute Exception (EXE) 


20 


Data Fetch (DF) 


22-34 


Result Exceptions 


35-38 


Flagging 


39-40 


Transits 


41-47 


Program 



Time signal and execute exception are permanently 
masked on, but to give the problem program more 
control, they are treated as pseudo-maskable (see 
the description of the maskable interrupt routine, 
and the EXE interrupt). The IF indicator, the mask 
of which must always be 1, is not included in this 
group. 

Interrupts caused by these indicators are routed 
via the parallel interrupt table to the maskable inter- 
rupt routine, or, in the case of TS, to a special entry 
in the maskable interrupt routine. Control then passes 
to a program table of exits (PTOE) in either PP or 
MCP. In the case of MCP, the standard fixup routine 
is entered from the PTOE, and control returned to 
the point of interrupt via the return after maskable 
interrupt routine. 

The Program Table of Exits (PTOE) 

When any maskable interrupts are masked on, fixup 
routines must be available to handle the resulting 
interrupts. The problem program has the option of 
providing special fixup routines or of using the MCP 
standard fixup routine, or a combination of both. 

If the problem program is to use special fixup 
routines, it must provide MCP with a program table 
of exits (PTOE) to these routines. The refill field 
(RF) of index register 15 ($15) is reserved for this 
purpose. If the problem program is to use any spe- 
cial fixup routines for maskable interrupts, it must 
load the RF of $15 with the first word (18 bit) address 
of a PTOE. The RF of $15 will be zero when MCP 
initially gives control to PP. It will also be zero when 
MCP gives control to any PP I-O table of exits. It 
is the responsibility of the PP that $15 RF be correct 
whenever PP has control. PP may provide as many 
special PTOE's as are necessary, changing $15 RF 
when desired. 

The PTOE reserves storage for the IC, the indica- 
tor register and the mask register ($IND and $MASK). 



containing k 



It consists of 4+k full words as follows: 
Word Content 

1 Saved IC 

2 Saved $IND 

3 Saved $MASK 

4 Pattern word, 

ones 
4+1 First instruction for the first 

special interrupt routine. 
4+i First instruction for the ith 

special interrupt routine. 
4+k First instruction for the last 

special interrupt routine. 
The pattern word indicates whether the PP furnishes 
a special interrupt routine or desires to use the stand- 
ard fixup routine. There is a one-to-one correspond- 
ence between positions in the indicator register and in 
the pattern word. When a pattern word bit is set to 
one, it means that a special interrupt routine is to be 
used for the corresponding interrupt. The first 
instruction for the routine must be in the PTOE at 
word 4+i, where the interrupt indicator register posi- 
tion corresponds to the ith one in the pattern word. 
Only bits 4. 18, 20, and 22 through 47 may be set to 
one in the pattern word. All others are treated as 
zero. The PP must set the appropriate mask bits in 
the mask register ($MASK). The IF mask bit, 21, 
must always be left as one. 

When MCP enters the problem program PTOE, the 
IC, $IND, and $MASK are stored in the word specified. 
The remaining low registers are unchanged. $IND is 
cleared to zero, and $MASK is cleared to zero except 
for the IF bit and those permanently on. 

Maskable interrupts $TS and $EXE are considered 
as masked off unless a PP PTOE is specified, and the 
corresponding pattern bits are on. 

The MCP PTOE and the Standard Fixup 

Since PP may elect to take maskable interrupts with- 
out providing special interrupt routines , MCP is pre- 
pared to take any maskable interrupt. MCP provides 
its own PTOE, which is entered when PP does not pro- 
vide a PTOE, or when the appropriate pattern bit in 
the PP PTOE is off. 

The MCP PTOE is located at SFPTE. It has the 
same structure as the PP PTOE, and contains ones in 
the pattern word corresponding to each of the maskable 
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interrupts. The last 27 full word entry points are all 
of the form 

LVI, $1, ** 

B, YMSF 

(** denotes the location of the A8 indicator 
mnemonic) 
NOTE: The first two, TS and EXE, are treated as 
masked off, and the PTOE branches to the return after 
maskable routine (WRAM) . 

Thus, control passes to a standard fixup routine with 
the location of the A8 indicator mnemonic in $1. The 
maskable interrupt standard fixup routine, YMSF, 
saves the low registers in SLRBU, and puts the indica- 
tor mnemonic and the IC in a message skeleton. The 
program changes the level to MCP and branches to the 
system short message routine to print the following 
message on the output tape: 

INTERRUPT **. INSTRUCTION COUNTER 
CONTENTS XXXXXX.X 
Since the level bit (SL) is set to MCP, the return 
routine will return to PP rather than to the short 
message routine. (See the description of the short 
message routine and the return routine. ) 

If PP has entered the standard fixup routine 50 
times, the dispatcher error control routine (SDISP) 
is entered with error code 13 in $14. This will result 
in ABEOJ for the PP. 



The Maskable Interrupt Routine 

From the parallel interrupt table, the maskable inter- 
rupt routine is entered disabled at WLODE for all 
maskable interrupts except TS. It is entered at 
JWLODE when a TS interrupt occurs. The routine 
selects either the PP or the MCP PTOE, performs 
the necessary set-up, and enters the table. 

TS Maskable Interrupt 

The TS interrupt is the only maskable interrupt 
occurring asynchronously with the program in con- 
trol, therefore, the system modes must be deter- 
mined before the interrupt is released to a PTOE. 
If TS interrupts MCP, the TS is stacked until control 
is returned to PP. If TS interrupts a PP I-O fixup 
(PP auto-stacked), the TS will be stacked until con- 
trol is returned to PP mainstream, unless PP has 
provided a PTOE effective in auto-stack mode. 
(Recall that MCP sets $15 to zero before entering a 
PP 1-0 table of exits. ) If TS occurs while a PP 
PTOE has control (SSPFIX = 1) , it will be stacked, 
requiring that PP leave the PTOE with a $RAM pseu- 
do-op (return after maskable) to unstack TS interrupt. 



The low registers are saved in STLR upon entry 
into the maskable interrupt routine (Figure 4) . If 
the interrupt was TS (entry at JWLODE), the system 
mode control bits are tested and the TS either stacked 
or given to a PTOE. It will be given to a PTOE only 
if it occurs in PP main stream, or in PP auto stack 
with a PP PTOE provided. Otherwise, it is stacked 
as follows: 

TS Occurs Stacked by Unstacked 

in Setting by 



PP special 
fixup (PP PTOE 
in use) 



STSBIT 



PP auto- stacked SLRPP+8.4 
(no PP PTOE 
provided in A/S) 



MCP 



SLRBU+8.4 



$RAM 



$RET 



$RET 



The first case (PP special fixup) is provided 
because of the asjmchronous nature of the TS interrupt, 
to keep an uncontrollable maskable interrupt from 
occurring during a maskable interrupt fixup. To pre- 
vent this, MCP stacks the TS and releases it to the 
PTOE when the PP executes $RAM. The second case 
(PP auto-stacked) provides for holding the TS inter- 
rupt until return to PP mainstream, unless PP has 
specifically provided for taking the interrupt by 
loading $15 RF in the I-O fixup routine. The third 
case is simply an exercise of MCP priority over PP. 
As with any other PP interrupt, the TS interrupt is 
stacked until MCP returns control to PP. 

In the first case, the stacking mechanism is simply 
a bit (STSBIT) reserved for that specific purpose. In 
the last two cases, the stacking mechanism involves 
the basic return logic in MCP. The buffers SLRPP 
and SLRBU are used to save PP low registers when 
transfer of control among programs is involved. 
SLRPP contains PP mainstream registers while PP 
is in an I-O fixup, or when MCP has control after 
having interrupted the PP I-O fixup. In any case 
where the program level is changed from PP to MCP, 
the PP registers at the point where the level changed 
are saved in SLRBU. Thus, SLRBU may contain regi- 
sters from either PP mainstream or a PP I-O fixup. 
When the level is returned to PP, it always returns 
via SLRBU. Return via SLRPP occurs when a PP I-O 
fixup returns to PP mainstream. 

When the return routine is returning to PP via either 
SLRBU or SLRPP, it examines bit 8.4 of the buffer to 
determine if a TS has been stacked. If so, it restores 
low registers and exits to the TS entry in the parallel 
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I 
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X» SPECIAL FIXLF 
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Figure 4 - The Maskable Interrupt Routine 



interrupt table, faking the TS interrupt. Thus, the 
TS eventually gets unstacked while PP has control. 

Other Maskable Interrupts 

Maskable interrupts other than TS, together with TS 
interrupts being taken, are processed by the routine 
which starts at WLODE (Figure 4) . If $15 RF is zero 
(no PP PTOE provided), the routine selects the MCP 
PTOE and sets the exit branch to disabled. If $15 RF 
is not zero, it is checked for being in PP boundaries, 
and the exit branch set to enabled. If the PTOE is 
outside PP bounds, control is given to dispatcher error 
control (SDISP) with error code 17 in $14. 

The program checks the pattern word of the PTOE 
selected. If the required bit is off, it loops back to 
select the MCP PTOE and change the exit to disabled. 
(The MCP PTOE pattern word has a one for every 
maskable interrupt. ) It then computes the exit address 
and stores it in the preset BD or BE. If the required 
bit is on in the PP PTOE selected, a bit is set 
(SSPFDQ to indicate to MCP that PP is in a special 
fixup. The IC, $IND, and $MASK are stored in the 
PTOE, $EXE is reset (see the following description 
of the EXE interrupt), the used registers are restored, 
and the PTOE is entered. 



set). If this will not be the ease, $EXE must be 
turned off, and a mechanism established to fake the 
interrupt at a proper time. 

The combinations of interrupts of concern are as 
follows: EXE interrupt by itself, TC with $EXE set, 
I-O with $EXE set, and TS with both I-O and $EXE 
set. These may occur only in PP; however, they 
must be considered separately for the three levels 
of PP: mainstream, auto-stacked, and special fixup. 

EXE Interrupt Alone 

If the EXE interrupt occurs by itself (no higher 
priority indicators) in PP mainstream, it is either 
taken by the PP PTOE (if one exists with the EXE 
pattern bit on) or is ignored and return is to the point 
of interrupt in PP. 

If the EXE occurs in a PP special fixup, it is 
treated as though it were mainstream. The PP has 
control of PTOE specification and should be prepared 
for this eventuality. 

If the EXE occurs in PP auto-stacked, it is again 
treated as though it were mainstream. If PP may 
cause EXE in an I-O fixup, then the fixup routine 
must provide a PTOE if the EXE is to be taken. 



The EXE Interrupt and Combinations 

The EXE interrupt, although permanently masked on, 
is treated as pseudo- maskable by MCP. Since 18 
other interrupts have priority over EXE, the simul- 
taneous occurrence of $EXE and the higher priority 
indicators must be considered. Not all of these 
simultaneous occurrences are significant, in view of 
the following analysis: 

1. $EXE is off if an interrupt is caused by DS or 
a lower priority indicator. 

2. $EXE will not be set while MCP has control. 

3. Interrupts caused by indicators MK, IK, U, 
EK, and CPUS (0-3, 5) always result in a BD,$, and 
the status of $EXE is of no concern. 

4. Interrupts caused by indicators EKJ, UNRJ, 
CBJ, OP, AD, and USA (6-8, 15-17) result in ABEOJ 
or BD, $, so the only concern is that $EXE be off if 
ABEOJ is to be taken. 

5. The remaining interrupts with higher priority 
than EXE are TS (4) and the I-O (9-13). 

6. Since EXE is treated as pseudo-maskable, it 
is considered as masked off unless there is a PP 
PTOE with the EXE pattern bit on. 

7. If $EXE is on when a higher priority interrupt 
occurs, it cannot be allowed to remain on and cause 
the interrupt on any subsequent BE; the BE must be 
to the point of original interrupt (where $EXE was 



TS Interrupt, $EXE Set 

If a TS interrupt occurs with $EXE set, the handling 
of the EXE is Influenced by the disposition of the TS. 
If the TS is stacked (for instance with PP in auto- 
stack with no PTOE) or in special fixup, $EXE may 
remain on and be allowed to occur on return to the 
point of TS interrupt. If the TS is taken, the $IND is 
saved with the EXE bit set in the PTOE (MCP or PP), 
$EXE itself turned off, and the EXE interrupt faked 
when $RAM is executed after the TS fixup (MCP or 
PP). 

I-O Interrupt, $EXE Set 

When an I-O interrupt occurs, the receptor will either 
enter the appropriate I-O table of exits or return to 
the point of interrupt with the I-O interrupt stacked, 
depending on the modes (SIO or A/S) of the programs 
and the owner of the interrupt. If the receptor is to 
return to the point of the interrupt, then $EXE may 
remain on to occur when the return is attempted. If 
a table of exits is to be entered, the PP low registers 
are saved in SLRPP (including $IND with $EXE on), 
and $EXE must be turned off to enter the I-O fixup 
enabled. The EXE will be detected by the return 
routine ($RET) when attempting to restore low regi- 
sters from SLRPP, and an EXE interrupt faked at 
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that point, which reduces to the case of an EXE inter- 
rupt by itself. 

TS Interrupt, an I-O Indicator On, $EXE On 

If a TS interrupt occurs and an I-O indicator and $EXE 
come on simultaneously, the TS interrupt is processed 
in the normal manner. If a PTOE is to be entered, 
$EXE is turned off (on in the PTOE), and the situation 
is reduced to a simultaneous TS and EXE with a sub- 
sequent I-O. If the TS is to be stacked, the I-O occurs 
on attempt to return to the point of interrupt, and the 
situation is that of simultaneous I-O and EXE. 

Return After Maskable Interrupt 

The return after maskable interrupt routine is entered 
from the MCP PTOE or when the pseudo-op $RAM is 
executed. Its function is to return to the point at which 
a maskable interrupt occurred, after first releasing 
a stacked TS or EXE interrupt. It operates entirely 
disabled. 

When $RAM is executed, the routine is entered from 
the identifier at WRAMPP (Figure 5) . The current 
PP PTOE specified by $15 RF is compared with the PP 
boundaries, and if it is not within PP boundaries, 
dispatcher error control is entered (SDISP) with error 
code 17 in $14. The PP special fixup bit is reset 
(SSPFIX), and STSBIT tested for a stacked TS inter- 
rupt. If a TS occurred while the special fixup was in 
progress (STSBIT one), the saved IC is stored in STIC, 
the used registers are restored, and the TS interrupt 
faked by a branch to the parallel interrupt table at 
SIPT+4.0. 

If STSBIT is off, bit 18 of the saved indicator regi- 
ster is tested to determine if an EXE had been stacked 
due to the simultaneous occurrence of TS. If so, con- 
ditions are restored and control returned enabled to 
the point at which the maskable interrupt occurred. 

When the routine is entered at WRAM by the MCP 
PTOE as a result of a TS or EXE interrupt which was 
logically masked off, the MCP PTOE address is 
selected, and control is given to the main line of the 
routine at the point of the EXE test. 

I-O INTERRUPTS 

The I-O interrupts correspond to the five indicators: 
$EPGK, $UK, $EE, $EOP, and $CS. When any of 
these interrupts occur, the MCP receptor is entered. 
The receptor must identify the owner of the interrupt 
and either pass it to the proper program or stack it, 
according to program mode. 



Channel signal (CS) interrupts from the console are 
given by the receptor to the conceptor because the owner 
of a CS from the console cannot be identified until a 
read is performed. The conceptor is used to perform 
this identification. 



The Receptor 

The receptor is entered disabled from the parallel 
interrupt table with a bit set in SPSIOI corresponding 
to the interrupt. The functions of the receptor are; 

1 . To identify the interrupt and its owner and 
decide whether to stack the interrupt or pass it to the 
proper program. 

2. To stack all channel signal interrupts occurring 
simultaneously with other interrupts. CS interrupts 
will be treated at a later time as separate interrupts. 

3. To pass console signals to the conceptor. 

4. To update tape file and disk arc records in the 
control tables. 

An I-O interrupt may be owned by PP, an MCP 
major package, or by a set-up operation being per- 
formed by a disabled MCP routine (e. g. , change 
density). If it is a set-up operation, control will be 
given to the appropriate routine at the address speci- 
fied in SRETAD in the unit area table, UAT. (See 
Control of Symbolic I-O.) 

Interrupts caused by non-set-up operations will be 
stacked if the owner is in a stack I-O mode, or if the 
owner is PP and the system is at MCP level. Stacked 
interrupts are eventually unstacked by the dispatcher 
return routine, which enters the receptor by way of 
the unstack subroutine. 

The receptor is entered at KSTORE from the par- 
allel interrupt table, and also at three other points 
in the following circumstances: 

Entry Point Circumstances 



KUNSTC 



KQIN 



KGATE 



The return routine is 
unstacking an interrupt. 
$RIO has been given, and 
stacked interrupts must be 
unstacked. 

Entered by the conceptor to 
fake a CS. 

Entered by the actuator and 
conceptor to fake an inter- 
rupt under certain circum- 
stances. 
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Figure 5 - The Return AEter Maskable Routine 



The exits from the receptor are as follows: 
Exit To Circumstances 



The address 
specified in 
SRETAD in the 
UAT. 

PCONEl 

(the conceptor) 

The I-O table 
of exits speci- 
fied in the FAT 

KSUPP 
(service- op 
return) 



The set-up I-O bit (SSETUP) 
is on in the unit status table 
(UST) , indicating that it was 
a set-up operation. 

The interrupt is a channel 
signal from the console. 

The interrupt owner is MCP, 
or PP at PP level, and is not 
stacking I-O. 

The interrupt is stacked, 
because the owner cannot 
take it now. 

Either OP, AD, USA, or DS 
indicators occurred simul- 
taneously with the I-O inter- 
rupt, and are being allowed 
to interrupt. 

An EOP interrupt occurred 
for an operation which had 
been requested in the SEOP 
mode. 

Type 5 error, a PP TOE is 
out of PP bounds . 
Type 78 error, there is no 
more room in the interrupt 
queue . 

Type 76 error, a locate or 
CCW attempted by the recep- 
tor has been repeatedly 
rejected. 



The Receptor Main Flow 

The receptor (KSTORE, Figure 6) saves the low regi- 
sters in STLR, clears the I-O indicators, and com- 
putes the address of the channel status table. If the 
interrupt is CS alone, and occurs in a multi-unit 
channel, control is given to KSIGNL to find the unit. 
If the interrupt was not CS, but CS is on, subroutine 
KCSIN is used to stack the CS and set KSUPP to 
unstack it. In either case, address of the UST is 
obtained. 

If the channel is a single unit channel, the unit 
status table (actually the CST) address is set up 
(KSINGL). If the unit was not assigned, it is assumed 
that the interrupt was a stray CS from the card reader, 
printer, or punch, and an exit is made via the service 
op return routine (KSUPP) . 



SDISP 
(dispatcher 
error 
control) 



NOTE: The disk and the console are considered as 
multi-unit channels, since they may have more than 
one logical unit. 

Whether a single or a multi-unit channel, the unit 
and file area table addresses are set up at KDOOL. 
The index registers at this point locate the control 
tables as follows; 

$10 VF Address of CST 

$11VF Address of UST 

$12VF Address of UAT 

$13VF Address of FAT 
If the set-up bit is on (SSETUP) in the UST, control 
is given to the address specified in SRETAD in the 
UAT. Otherwise, $1 is set for an ultimate branch to 
KNORM at KLEVEL, and control passes to KGATE 
after performing the following bookkeeping: 

1. If the operation is read or write, CCW into 
SCCW in the FAT. 

2. If tape, update the file count (SFILEK) in the 
UAT according to the interrupt and the I-O operation. 

3. If disk, update the current arc address (SCUARC) 
in the FAT, and the located arc address (SARCAD) 

in the CST. 

The receptor is entered at KGATE from the actua- 
tor and the conceptor with the index registers set as 
though KSTORE had been entered. The actuator enters 
the receptor either with the index registers set as 
though an EPGK had occurred (when, for example, a 
read request is received for a file protected tape) or 
with EOP faked when a $REL is requested. The con- 
ceptor enters the receptor when a console read is 
given after a console channel signal had been passed 
to the user. Since the read had already been done by 
the conceptor, it is necessary to fake an EOP to the 
using program. 

At KGATE (Figure 7) the I-O indicators are saved 
in the FAT, and the status indicators are cleared in 
the UST. The release and SEOP bits are examined 
in the UST. If the release bit is on, the code at W23K 
is used to return to KGATE with an EOP faked for 
the release. If the SEOP bit is on, a check is made 
for indicators other than EOP (at KFREE) and if none 
are on, the service op return routine is entered 
(KSUPP). If others are on, or if the SEOP bit was 
not on, control passes to KQIN. 

At KQIN, the interrupt is stacked in the interrupt 
queue (SQUE) , which consists of 128 nineteen-bit 
fields containing the 18 bit address of the FAT and a 
bit identifying the owner of the unit. PP and MCP 
interrupts are intermixed in the same queue. How- 
ever, a separate count of stacked interrupts is main- 
tained for the two levels and is stored in the value field 
of the second half word (SQK) of .the program status 
table (SPROGS) for the level. The unit suppressed 
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Figure 6 - The Receptor - Chart 1 
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bit (SUNSUP) is set, and control given to either 
KNORM or KHEX, according to $1. 

At KNORM, (Figure 7), a decision is made whether 
or not to unstack the interrupt. If PP is interrupting 
MCP, the interrupt remains suppressed and exit is 
made via the service op return routine (KSUPP) . If 
MCP is interrupting PP, the unstack routine (KUNSTC) 
is entered after moving low registers to the back-up 
buffer. If the present program level is the same as 
that of the interrupt owner, and the program is not in 
$WAIT status or in auto-stack or SIO mode, the inter- 
rupt will be unstacked. If the program is in $WAIT 
status, and is auto-stacked, the servi-ce ap return 
routine is entered. The $WAIT routine will unstack 
this interrupt if it is the one awaited. In all cases 
where the interrupt is to be unstacked, low registers 
are saved in the appropriate buffer. (See description 
of the return routine.) 

The unstack routine returns to KINTTY, where the 
proper mask and boundaries are set up, and the pro- 
gram put in the auto-stack mode. If a PP TOE is to 
be entered, it is checked against the PP bounds. The 
unit suppressed bit is reset, and the table of exits is 
set up. If either OP, AD, USA, or DS are on, 
KSUPP is entered to allow the error interrupt. 
Otherwise, the maskable indicators are cleared, $15 
is cleared, $EXE is reset, and the TOE is entered 
enabled according to the highest priority I-O indica- 
tor that was on. 

The Channel Signal Search 

Control is given to KSIGNL (Figure 8) when a channel 
signal is received from a multi-unit channel. (The 
console and disk are considered logically as multi- 
unit channels.) If the CS is from the console, con- 
trol is given to the conceptor at PCONEl. If from 
tape, control passes to KHEX. The function of the 
code at KHEX is to determine what change, if any, 
has been made in the ready status of the tape units 
on that channel. If the equipment is neither tape nor 
console, control is returned to the main flow at KKK. 

The channel signal will be considered valid only for 
tape units in a mount or rewind status (SMOUNT, 
SREW in the UST). For all such units on the channel, 
the unit will be selected, the control word copied, 
and the ready bit tested. If the unit is now ready, the 
UST is updated, and, if the CS followed a $REW or a 
$UNLOAD, a CS for the unit is stacked at KQIN and 
control returned to KHEX. 

After testing all the units on the channel, control 
is returned to KNORM or KSUPP according to whether 
or not a change in ready status was found. First, 
however, the unit originally in select on the channel 
(SUNIT in the CST) is relocated. 



Search and Unstack 

The search subroutine (KSERCH, Figure 9) is used 
by $WAIT, the return routine, and the receptor to 
search the interrupt queue for a particular FAT 
address (the one being waited). It uses the linkage 

LVI, 1, $+1.0 

B, KSERCH 

(not found return) 

(found return) 
with the desired FAT address in $13VF. ff it finds 
the address in the queue, it repacks the queue 
(KPACK) and reduces the proper queue count. 

The unstack routine (KUNSTC, Figure 9) is entered 
by the receptor, the return routine, and the $RIO 
routine to release interrupts. It will try to obtain the 
first MCP FAT address from the queue, otherwise 
the first PP FAT address. Then it enters the search 
routine in the vicinity of KPACK with $1 set to 
KINTTY- . 32, to force return to KINTTY after repack- 
ing the queue. If the queue is empty, the unstack 
routine returns to KSUPP. 

Channel Signal and Console Unstack Control 
If the CS indicator is on when a higher priority 1-0 
interrupt occurs for a multi-unit channel, the channel 
signal is deferred. The higher priority interrupt is 
associated with the unit in select, but the channel 
signal may have originated at any unit on the channel. 

The receptor uses the subroutine KCSIN to stack 
the CS until a later time. The stacking consists of 
setting a bit corresponding to the channel number in 
the word KCSREG. The NOP at KSUPCS in the serv- 
ice op return routine is changed to a branch, and the 
CS will be unstacked on the next entry to the service 
op return routine. When this occurs, control passes 
to KMTCSQ (Figure 10) . The channel number for the 
first 1 in KCSREG is computed, and if the channel is 
not operating, the receptor is entered at SFAKEI with 
registers set up as though the CS had just occurred by 
itself. If, after resetting. the bit in KCSREG, the word 
is all zeros, the instruction at KSUPCS is changed to 
a NOP. 

If the channel is operating, the KCSREG is examined 
for additional I's. If 1 is found for a non-operating 
channel, control goes to SFAKEI as described. Other- 
wise, the service op return routine is used, and 
unstacking of the CS is deferred until the channel is 
not busy. 

The service op return routine is also used to unstack 
console interrupts in certain circumstances. If the 
$COMM pseudo-op had been given while the console 
was being used for non-commentator I-O, the com- 
mentator suppresses the console user's interrupts 
and changes KSUPP to a branch to KCOMMR to release 
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Figure 8 - The Receptor - Chart 3 (Service Op Return) 
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them. Furtiiermore, if the commentator suppressed 
a conceptor EOP, it changed the instruction at 
KCONCP to a NOP, and stored the copied control word 
at KCOMCW. If the suppressed interrupt was not the 
conceptor's, then the commentator stored the UAT 
address in KCOMMR. 

When the service op return routine is entered with 
KSUPP (Figure 10) set to a branch, the switch is reset 
and the UAT address (if any) is picked up. If the inter- 
rupt is the conceptor's (KCONCP a NOP), the registers 
are set up as though the interrupt had been received 
by the receptor and reccgnized as a conceptor set-up 
operation. Control is given to PCONE2. If the inter- 
nipt is not the conceptor's, then registers are set up 
as though the interrupt had been received by the recep- 
tor, and the receptor is entered at KNORM. The 
return function of the service op return routine is 
discussed with the dispatcher programs. 



The Conceptor 

The conceptor is a special program to receive con- 
sole channel signals. It performs a set-up console 
read, and, upon completion, identifies the owner of 
the CS and sets up a fake CS for that owner. When 
the subsequent $READ is issued, the actuator enters 
the conceptor, which performs a data transmission 
and enters the receptor with an EOP faked for the 
read. 

The three entry points are: PCONEl, when a CS 
is received; PCONE2, when the read is complete, 
PCSRD, when the $READ is given. 

The Channel Signal Entry 

When a console channel signal is received (or unstacked) 
by the receptor, the conceptor is entered at PCONEl 
(Figure 11). The conceptor sets up the addresses of 
the MCP console tables, turns on the reserved light, 
and gives a set-up console read, with PCONE2 in 
SRETAD in the UAT. It exits to KSUPP. 



be PP, the debugging package, or the command pack- 
age as follows: 

1. The owner is PP if either: 

The keyboard was not enabled (CS key) and 
the message consists of the switches and keys 
(the end code is in the third word) . 
The first two non-control characters of the 
message are PP. 

2. The owner is the debugging package if the end 
code is the first character of the fourth word (the 
ENTER, END sequence) . 

3. Otherwise, the owner is the command package. 
The flow separates according to the owner, and 

converges again at PMAIN for the two MCP owners, 
and at PEXl for all owners. If a typewritten message 
had been read, it is edited for backspace codes by 
the subroutine GEDIT, and, according to owner, the 
proper tables and registers are set up. MCP messages 
are stored in the buffer PMCPBF, and PP messages 
are stored in PPPBF. At PEXl, the console signal 
bit, SCNSSG, is set in the UST, and control given to 
KQIN with registers set as though a CS had just 
occurred and with $1 set to KNORM. 

The Actuator Entry 

The recipient of the faked channel signal is expected 
to issue a $READ for the console. When the actuator 
read routine receives a console read request with 
SCNSSG set in the UST, it enters the conceptor at 
PCSRD, since the hardware read has already been 
done. 

At PCSRD (Figure 11), the SCNSSG bit is reset and 
the subroutine GTRANF used to transfer the message 
from the buffer to the user according to the control 
word. Registers are then set up as though a hard- 
ware read had terminated with EOP, and the receptor 
is entered at KGATE. 



THE IF INTERRUPT ~ THE DISPATCHER 



The Set-Up Interrupt Entry 

When the interrupt occurs from the set up read, the 
conceptor is entered at PCONE2 (Figure 11). The pro- 
gram resets the set up, read, and channel operating 
bits, and tests the interrupt indicators. An error 
message is printed if EPGK or UK is on, and control 
returned via KSUPP. PCONEl is entered if CS is on, 
and if EE is on, a message is printed acknowledging 
the erase. 

If EOP is the only indicator on, the message is 
examined to determine the owner. The owner may 



The IF interrupt initiates major transfers of control 
within MCP, between MCP and PP, and between the 
PP I-O fixups and PP mainstream. Control programs 
concerned with the IF interrupt are referred to 
collectively as the dispatcher. The dispatcher con- 
sists of the IF analyzer, the identifier, the service 
op return program, the return routine, and error 
control. All dispatcher programs operate disabled. 
Figure 12 provides a general picture of flow in and 
through the dispatcher. 

All pseudo-op requests generate an IF interrupt, 
resulting in control passing to the IF analyzer. 
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Pseudo-ops are requested by an acceptable linkage 
of the form 
B, $MCP 

, ($0P) 

, parameter 

, parameter 
where $MCP is defined as 32.0 in protected storage, 
($OP) is the pseudo-op code, and the parameters 
depend upon the pseudo-op for their meaning and 
number. The B, $MCP results in. an IF interrupt 
which is taken by the IF analyzer. The action taken 
by the IF analyzer depends upon the pseudo-op 
requested and may involve setting up a tentacle table. 

The Pseudo-CJps 

Pseudo-ops are considered in two categories: the 
service pseudo-ops (Figure 13), and the major pack- 
ages (Figure 14). 

The service pseudo-ops are considered an exten- 
sion of the requesting program; they operate disabled. 



and always return to the point of request via the serv- 
ice-op return routine (except $RET and $RAM; see 
description of return routine) . The level bit (SL) is 
not changed when the service-ops are used. 

The major packages are MCP programs which 
may use other MCP programs. They are enabled at 
some time, and may be primed by MCP programs. 
When a major package is used, it operates at MCP 
level (level bit SL = 1). The major packages use 
tentacle tables for linkage and return control. When 
an major package uses another major packages, the 
latter must perform any necessary saving and 
restoring of registers. 



Pseudo-Op Code 



$RD 
$RDS 

$W 

$ws 
$ccw 

$REL 

$RELS 

$LOC 

$LCXS 

$FC 

$FCS 

$TIF 

$TIFS 

$ERG 

$ERGS 

$SP 

$SPS 



1.00 
1.01 
1.32 
1.33 
2.00 
2.32 
2.33 
3.00 
3.01 
3.32 
3.33 
4.00 
4.01 
5.00 
5.01 
5.32 
5.33 



Pseudo-Op 


Code 


Pseudo-Op 


Code 


$BSP 


6.00 


$KLNS 


10.01 


$BSPS 


6.01 


$FREE 


10.32 


$SPFL 


6.32 


$GONG 


11.00 


$SPFLS 


6.33 
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11.01 
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7.00 


$WAIT 


11.32 
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7.01 
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7.32 


$FREE 


12.32 
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$IODEF 


13.00 


$REW 


8.00 


$SIO 


32.00 
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$RIO 
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8.32 


$RET 
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8.33 
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9.00 
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34.00 
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9.01 
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9.32 


$TIME 


35.00 


$RLNS 


9.33 


$COMM 
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10.00 
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36.00 



* Available only to MCP. 

Figure 13. The Service Pseudo-Ops 
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Pseudo-Op 


Code 


Pseudo-Op 


Name 


Code 


$DUMP 


64.00 


SJCl 


Job Control 1 


76.32 


$EDUMP 


64.32 


SOUTPT 


Output Command 


77.00 


$EOJ 


65.00 


SSPEOJ 


Output EOJ 


77.32 


$HOLD 


65.32 


SDDT 


Debugger 


78.00 


$RESLD 


66.00 


SJC4 


IPL Entry to JC4 


78.32 


$FETCH 


66.32 


SSCR4 


First Card Request 


79.00 


$SPU 


67.00 


SKOM 


Input Commands 


79.32 


$SPR 


67.32 


SCOMD 


System Commands 


80.00 


$ABEOJ 


68.00 


SLOG4 


Logger 4 


80.32 


$SCR 


68.32 


SLOG2 


Logger 2 


81.00 
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81.32 



Figure 14. Major Package Pseudo-Ops 
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The Tentacle Table 

Each major package program has an associated ten- 
tacle table located in its program area. The tentacle 
table provides operating control information for the 
major package program, and is used for linkage, 
return, and priming control. 

The tentacle table (Figure 15) is composed of two 
and one-half words plus N half-word linkage param- 
eters. 

To determine the number of half word parameters 
(N) in the pseudo-op linkage, $OP is counted as the 
first half word, then a half word is reserved in the 
table for each parameter in the linkage. An additional 
two and one-half full words are in the tentacle table. 
Therefore, the size of each table is two and one-half 
words plus N half words,, arranged as follows: 

Each linkage parameter will be processed as 
controlled by its parameter descriptor. For each 
parameter in the linkage following the half word for 
$OP, there will be a corresponding half word slot in 
the tentacle table. 

The IF Analyzer 

When an IF interrupt occurs, the IF analyzer receives 
control in the disabled mode from the interrupt table. 
The IF analyzer itself may also be entered by a dis- 
abled MCP program requesting a major package, or 
by the return routine entering a primed major pack- 
age. The IF analyzer channels all requests for the 
service-ops to the identifier routine. Figure 16 
summarizes the entries to and exits from the IF 
analyzer. 

The IF analyzer (Figure 17) saves low registers in 
the STLR buffer. The multiplier register ($MR; see 
Appendix B) is saved, and the linkage examined for a 
valid IF interrupt. If the instruction causing the inter- 
rupt was not a B,$MCP, control is given to dispatcher 
error control (SDISP) with error code 1 in $14. If 
the op code is less than 1.0, or has ones in any of 
bits 19 through 22, control is given to dispatcher 
error control with error code 2 in $14. If the op code 
is in the range of the service ops (less than 64.0), 
control is given to the identifier routine (KFRONT) . 

If PP is requesting a major package pseudo-op, 
the MCP mask and boundaries replace those of PP 
and the registers saved (STLR) are moved to the 
backup buffer, SLRBU. The op code is tested to 
determine whether PP may legally request it (must 
be less than SJCl). If PP is trying to use an MCP 
pseudo-op, control is given to dispatcher error con- 
trol with error code 2 in $14. 

The foregoing steps are skipped if the disabled 
entry was used (SIC, STIC; B,SIFAD). In this case 



low registers are saved in STLR and a full word is 
subtracted from the address saved upon entry. Then, 
for either method of entry, the entry in the IF ana- 
lyzer operation table corresponding to the pseudo-op 
is located, and, in turn, gives the address of the 
tentacle table. If the busy bit in this table is 1, the 
return address is set as the location of the B, $MCP 
(or the SIC, STIC, if a disabled entry), low registers 
are restored, and control is returned to the linkage 
via the service op return routine. 

If an MCP fixup routine tries to use a major pack- 
age, an error code 80 is put in $14 and exit is made 
to error control (SDISP). A fixup routine may prime 
a major routine, but may not attempt to give it con- 
trol directly, since the interrupt may have occurred 
while a major package was operating. 

The required information is put in the tentacle 
table according to the parameter descriptors. The 
level bit (SL) is set to denote MCP ownership of the 
IC. The entry address is selected (MTCl), the entry 
modes are preset (MTC2A), and the routine is entered. 

The IF analyzer operation table starts at MIFTTT 
and is used by the IF analyzer to determine the loca- 
tion of the tentacle table pertaining to the pseudo-op 
requested. The table is constructed so that each half 
word contains the address of the oertinent tentacle 
table. It is arranged in order of pseudo-op codes. 

Identifier Routine 

When a service-operation is requested, the identifier 
routine is entered disabled from the IF analyzer. 
The functions of the identifier routine are to: 

1. Identify the specific unit assigned to the sym- 
bolic file referenced in the calling sequence, 

2. Check the calling sequence for a legal request, 

3. Transfer control to the proper service routine 
for the performance of the operation requested. 

The identifier is entered at KFRONT (Figure 18). 
If the pseudo-op is in the range 32.0 through 36.0 
(Figure 19), it does not use an lOD reference number, 
and the appropriate routine is entered. If the pseudo- 
op exceeds 36.0, dispatcher error control is entered 
with error code 2 in $14. 

For pseudo-ops less than 32.0, the lOD reference 
number (RN) is loaded in $1. For $RD, $RDS, $W, 
$WS, and $CCW, the control word address is loaded 
iipito $0. After turning off $USA and $AD, in the 
event they came on during one of the LVE instructions, 
the level bit (SL) is tested. If PP is requesting the 
pseudo-op, the lOD RN must be less than the maxi- 
mum PP lOD RN and must be a non-zero integer, or 
control is given to dispatcher error control (SDISP) 
with error code 4 in $14. 



30 



it 

Z r-1 



.9 



.10 



.11 



.12 



.13 



.14 



^ 



Parameter Descriptors 
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Parameter 14 



WotdO 

bit Q. 4 - the user bit defines the identity of the instruction coimter 
owner at the time the IF analyzer was entered. If 1, owner is MCP; 
if 0, owner is problem program. 

bits Q. 5 through 0. 7 - entry mode bits determine whether the pro- 
gram is to be entered disabled, enabled-SIO' d, or enabled non-SIO'd: 



7 

1 

X, 
X 
{X = 1 or 0) 



.6 



1 
X 



Non-SIO, enabled entry ijiode 

SIO enabled entry mode 

Disabled entry mode 

Same as user is entry mode (for PP user, this 
implies non-SIO, enabled)- 
bit 0. 9 - busy bit - A 1 in bit position 0. 9 indicates that the pseudo- 
op program is in use. The IF analyzer will continuously return to the 
beginning of the user's linkage via the service op return routine. The 
user must be in the non-SIO enabled mode, because the busy signal 
can only be turned off by an I-O routine receiving confrol upon I-O 
interruption. 

bit 0. 11, 0. 13,. ■ . ,0. 37 - parameter descriptor (form effective) - 
If a 1 is in bit position 0-11, the effective address of the first param- 
eter will be formed and saved in the proper tentacle table position. 
With a in bit position 0. 11, the first parameter will be saved. 
Bit positions 0- 11 through 0. 38 are reserved for parameter descriptors, 
with two bit positions for each parameter. Except for the $OP param- 
eter, there are two parameter descriptors (form effective or restore) 
for each parameter in the pseudo-op linkage, allowing for 14 param- 
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FWA of Pseudo-Op 
Routine 



Return Address 



Pseudo-Op Parameter 



Parameter 3 



Parameter 5 



Parameter 15 



eters not including the $OP parameter. 

bit 0.12, 0. 14, - .. ,Q. 38 - parameter descriptor (restore) - If a 1 is 
in bit position 0. 12, the first parameter will be returned to the user's 
linkage when control is transferred back to that package. With a 
in bit position 0.12, the parameter will not be restored. 
bits 0. 45 through 0. 63 - FWA of pseudo-op routine - Word zero, bit 
positions 0. 45 through 0. 63, contains the location for the first word 
address of the pseudo-op routine pertineiri: to the tentacle table. The 
IF analyzer utlim.ately transfers to this address in the specified entry 
mode. 

Word 1, bits through 23. Value field - FWA of last tenUcle Table 
used - contains the first word address of the last tentacle table and 
locates the tentacle table pertinent to the user's routine. If the 
problem program is the user, this half word will be a zero. 
bits 32 through 55. Value field - return address - contains the normal 
return as computed by the IF analyzer unless otherwise modified by 
the pseudo -operation routine. The return service pseudo-op ($RET) 
will transfer control to this address when requested by the pseudo- 
program owning the tentacle table. 

Word 2, bits through 23, Value Field - FWA of pseudo-op linkage - 
contains the address of the first half word in the user's pseudo-operation 
linkage (B, $MCP). 

bits 32 through 55, Value Field - pseudo-op parameter - the identifi- 
cation of the pseudo-op as indicated in the second half of the linkage 
is saved in this slot. 



Figure 15. Tentacle Table Structure 
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ENTRIES 



Entry 
Synbol 

SIFAE 



SIFAD 



MTCl 



Conditions 

Entered disabled from 
intermpt table due to IF 
interrupt. Location of 
interrupt in STIC. 

Entered disabled by user 
(MCP). 



Entered disabled from 
return. Tentacle table 
parameters set up by 
return for primed routine. 



Registers 
Preserved 

All in STLR. If PP 
owns ICj also in 
SLRBU on other than 
service ops. 

AH in STLR, 



None. 



Remarks 

Enabled entry, with linkage: 
B, $MCP ; , $OP 
, PARAMETER 
, PARAMETER 

Disabled entry. User must be 

MCP. 

Linkage; 

SIC, STIC: BD, SIFAD 

, $OP; , PARAMETER 

Sets up entry address for routine. 
Used for same purpose by return to 
enter primed routine. 



MTC2A 



Entered disabled by return 
routine returning from major 
package to major package . 
Branch address presumed pre- 
set in MTC3A. 



None. 



Establishes SIO or non-SIO mode, 
enabled or disabled branch, and 
branches to routine. 



EXITS 
Exit to 
SDISP 



Conditions 

Error; code in $14; 



Registers 
Restored 

None. 



Remarks 

Errors possible: 

Type 1 (MNOMCP) illegal IF 

interrapt 
Type 2 (MOPCI) illegal op 

code 
Type 80 (MIFAS) MCP in 

Auto stack. 



KFRONT 



Address from 
tentacle table 

KSUPP 



$OP is a service op 
$1.0SOPS64. 0) 

Legal non- actuator 
pseudo-op. 

Tentacle table busy bit 
is set. Return is to the 
B, $MCP (or SIC, STIC). 



None. 



None, 



None. 



Exit to identifier routine. 



Tentacle linkage set up. 



Exit to service-op return routine 
to wait in enabled loop. 



Figure 16. Entries To and Exits From the IF Analyser 
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Figure 17 - The IF Analyzer 
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Figure 18 - The Identifier 



ENTRIES 

Entry 
Symbol 

KFRONT 



EXITS 



Conditions 

Entered disabled from the IF analyzer with pseudo-op64, 

$2VF points to calling sequence at pseudo-op. 

$3VF contains pseudo-op. Low registers are in STLR. 



Remarks 

Control sent here by the IF analyzer on any actuator 
pseudo-op. 



Exit to 
SDISP 



Conditions 

$OP is illegal lOD reference number invalid. Channel or 
unit not available. Referenced unit has an interrupt stacked. 



Remadcs 

Type 2 error. 
Type 4 error. 
Type 3 error. 
Type 12 error. 



KSUPP 



lOD refers to a tape unit in mount or REW status. Channel 
is operating. Pseudo-op in SFREE for an unassigned unit. 



Return address (STIC) set to FWA of linkage. Enabled 
loop until unit is ready. 

Return address (STIC) set to the instruction beyound 
linkage. Treated as NOP. 



ENTER 
Routine 



32. 0S$OPS36. 

The index registers are unchanged (same as at KFRONT). 



Routines are: 



ENTER 
Routine 



1.0:l$OP<13.0 

Actuated address and SEOP control set. 



Pseudo-OP 

$SIO 

$RIO 

$RET 

$RAM 

$STRG 

$FECRG 

$TIME 

$COMM 

$S1T 



Pseudo-Op 

$RD or $RDS 

$W or $WS 

$CCW 

$REL 

$IjDC 

$FC 

$TIF 

(Invalid) 

$ERG 

$SP 

$BSP 

$SPFL 

$BSFL 

$WEF 

$REW 

$UNLD 

$RLF 

$RLN 

$KLN 

$FREE 

$GONG 

$WAIT 

$CHEX 

$FREE 

$IODEF 





Entry Symbol 


32.0 


KSIO 


32.32 


KRIO 


33.0 


CRETN 


33.32 


WRAMPP 


34.0 


KSTRG 


34.32 


KFECRG 


35.0 


ZTIME 


35.32 


JCOMM 


36.0 


JSITX 


Return address set in STIC. 




Routines arer 






Entry Symbol 


1.0 


ZSTART 


1.32 


EWRl 


2.0 


BCCWR 


2.32 


WREL 


3.0 


KSIDC 


3.32 


WFC 


4.0 


BTIFR 


4.32 


SDISP (type 2) 


5.0 


EELG 


5.32 


Rl 


6.0 


R1+ 1.0 


6.32 


R1+ 2. 


7.0 


R2 - . 32 


7.32 


EWTl 


8.0 


ZREWST 


8.32 


ZUNLDB 


9.0 


BRLFR 


9.32 


BRLNR 


10.0 


HCLNR 


10. 32 


ZFREE 


11.0 


WGONG 


11.32 


KWAIT 


12.0 


CCHEX 


12.32 


ZFREE 


13.0 


JZIOR 



Figure 19. Identifier Routine Entries and Exits 
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The base address of the user's l-O table is added 
to $1 to locate the entry for the lOD RN. (If MCP is 
requesting SFREE, it is referring to a PP unit and 
the PP base address is added.) The unit area address 
for the lOD RN is loaded into $12 from the I-O table. 
A zero address denotes the absence of an lOD card 
for the lOD RN, in which case error control is entered 
with error code 4 in $14. The file area table is 
loaded into $13 from the 1-0 table. Index register 2 
is adjusted to point to the first instruction of the 
linkage (B,$MCP), $14 is loaded with the channel 
number, and $10 with the reference address for the 
channel status word in the channel status table. The 
equipment code is loaded into $4, and $11 is loaded 
with the correct unit status word reference, depending 
on whether or not the channel is a multiple unit channel. 
The index registers except $2, are now ready for 
entry into any of the routines (Figure 20). 

If the unit is a tape in mount or rewind status, con- 
trol is returned (KNOGO) to the linkage via the serv- 
ice op return routine to establish an enabled loop, 
unless the pseudo-op is one which will not require a 
hardware I-O instruction. If the pseudo-op is $CCW, 
$CHEX, or $IODEF, the appropriate routine may be 
entered, and control is given to KOPOK to accomplish 
the entry. If the pseudo-op is $REL or $FREE, the 
actuated address and the SEOP bit must be stored 
before entering the routine, and control is given to 
KKNI. 

For a single unit channel, or a tape unit not in 
mount or rewind status (KNI), the pseudo-op code is 
examined for $WAIT, $CHEX, or $IODEF, which 
may be entered immediately via KOPOK. A pseudo- 
op code greater than 13.0 is detected at this point, 
and control given to dispatcher error control with 
error code 2 in $14. 

If the channel and unit selected are not physically 
available, as indicated the appropriate bit in the 
corresponding status word, dispatcher error control 
is entered with error code 3 in $14. If the channel 



Index Register Value Field Contains 

$0 Control word address, 

$1 lOD RN entry in I-O table. 

$2 Return address if service op routine entered. 

$3 The pseudo-op code. 

$4 Equipment code. 

$10 Channel status word reference. 

$11 Unit status word reference. 

$12 Unit area table address. 

$13 File area table address. 

Figure 20. Status of Index Registers When Identifier Enters 
Routine (Pseudo-Op Less than 32.0) 



is operating, the pseudo-op is treated in the same 
manner as with a tape unit in mount or rewind status 
(KNOGO). 

If the unit has not been assigned, and the pseudo-op 
is not SFREE, dispatcher error control is entered 
with error code 4 in $14. Control is returned to the 
point after the linkage if MCP has requested SFREE 
for a unit already unassigned. 

For pseudo-ops other than $CCW, the unit sup- 
pressed bit is examined in. the status table. If the 
requested unit has an interrupt stacked, and the 
pseudo-op is $REL, $FREE, or SFREE, the inter- 
rupt is unstacked and discarded and the pseudo-op 
entered. A stacked CS interrupt is always discarded. 
Otherwise, error control is entered with type 12 error 
selected. 

The actuated address is stored in the file area 
(KKNI) , the actuated file address is stored in the 
unit area, and the SEOP bit originally specified is 
stored in the SEOP bit for the unit. Index register 2 
is adjusted for the return address (KOPOK) and 
stored in STIC and the routine is entered. 

T he Service- Op Return Routine 

The disabled routines in MCP need to return to the 
point of the most recent interrupt, or, in the case of 
an IF interrupt, to the beginning or end of the calling 
sequence. In all instances, the low register buffer 
(STLR) contains the information necessary to return. 
The service-op return routine, KSUPP, is used for 
this purpose. It includes an unstacking mechanism 
for console EOP and for tape unit channel signals. 

When the routine is entered, STIC must contain the 
address to which return is desired. If no unstacking 
is required, that is, the first two instructions are 
NOP's, the address in STIC is placed in a BE instruc- 
tion, the multiplier register ($MR; see Appendix B) 
and the low registers restored from STLR, and the 
BE executed. 

When a disabled routine decides to return via 
KSUPP, STIC is not always correct for the desired 
return, and must be adjusted before control goes to 
KSUPP. Occasionally, this is done in the routine. 
Other times, the disabled routine branches to a short 
routine to make the proper adjustment and branch to 
KSUPP. The most commonly used of these short 
routines are as follows: 

Symbol Quantity Placed in STIC 

KCBUSY $2VF-2.0 

KELOOP $2VF - 1. 32 

KSUPP2 $2VF + . 32 
KCHOPN $2VF 

KSUPP2 + . 32 $2VF 
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When it is necessary to stack a non-commentator 
EOP from the console, the first instruction of 
KSUPP, that is, NOP, KCOMMR, is changed to a 
branch by the commentator. The next entry to 
KSUPP results in the release of the EOP to the 
receptor. (See description of commentator. ) 

The second instruction of KSUPP, that is, NOP, 
KMTCSQ, is changed to a branch by the receptor 
when a CS arrives with a higher priority I-O inter- 
rupt. It is unstacked on a subsequent entry to KSUPP. 
(See description of receptor, channel signal, and 
console unstack control.) 

The Return Routine 

The identifier gives control to the return routine in 
the disabled mode when the pseudo-op $RET is 
requested. The problem program (PP) must use 
$RET to end its fixup routines in order to release 
stacked interrupts, and to permit MCP to restore 
the lower registers and instruction counter (IC). 
Only in this way can the PP be taken out of the auto- 
stack mode. MCP must use $RET to end MCP fixup 
routines, and to end any m.aior pseudo-op routine. 
The ultimate function of the return routine is to 
return control to the main stream of the problem 
program. A $RET request in PP m^ain stream results 
in immediate return to the point of request via the 
service op return routine. If the $RET is given else- 
where (PP fixup, MCP fixup, MCP routine) , the 
routine must insure that there are no stacked inter- 
rupts that can be unstacked, and no interrupted or 
primed MCP routines which should be given control. 

MCP Features and the Return Routine 

In order to follow the logic of the return routine, 
certain basic features of MCP must be understood. 
These features are described on the following pages. 

1. The utilization of buffers to store low registers. 

2. The priming of major pseudo-op routines. 

3. The use of the program status table. 

Low Register Buffers: There are four buffers used 
to store low registers: STLR, SLRBU, SLRPP, and 
SLRMCP. Each is thirty words long, and the last 
word of each is used to hold the IC associated with 
the low registers (STIC,.SICBU, SICPP, SICMCP). 

The low register buffer, STLR, always contains 
the registers from the most recent interrupt. When 
the return routine receives control, STLR contains 
the registers at the B, $MCP which requested the 
return. 

The back up buffer, SLRBU, is used to hold PP 
low registers as they were when the level changed 



from PP to MCP. It is filled from STLR by any 
MCP program which changes the level bit (SL) from 
zero to one. (Note that this excludes the service 
pseudo-ops, which operate at the level of the 
requestor, and which return via the service op return 
routine.) 

The PP low register buffer (SLRPP) is used to 
hold PP main stream registers when a PP I-O Table 
of Exits is to be entered. It is filled from STLR when 
a PP I-O interrupt occurs in non-SIO'd PP main 
stream. (Note that a PP I-O interrupt occurring at 
any other time is always stacked, and unstacked when 
SlO'd PP main stream requests $RIO. ) It may be 
filled by the return routine from SLRBU when MCP 
has requested $RET and PP interrupts must be 
unstacked. 

The MCP low register buffer (SLRMCP) is used to 
hold MCP main stream low registers when MCP inter- 
rupts MCP. It is filled from STLR by the receptor 
when the interrupt occurs, or by the return routine 
when an MCP program requests $RET and an MCP 
interrupt is unstacked. 

Word 9 of each buffer holds $MASK when the buffer 
is in use. With respect to buffers SLRMCP and 
SLRBU, bit of word 9 is used to denote that the 
buffer is in use. The corresponding position of 
$MASK is permanently 1, so the bit is set whenever 
the buffer is filled. The return routine resets bit 
9.0 of the buffer whenever it restores registers from 
SLRMCP or SLRBU. 

Primed Routines: A pseudo-op is said to be primed 
when delayed entry has been designated for it. (See 
description of prime routine.) The need to prime a 
major pseudo-op arises in two situations: 

1. An MCP auto-stacked routine must use the 
pseudo-op, but major pseudo-ops may not be used in 
the auto-stack mode. 

2. An MCP major package requires that another 
major package (or itself) be entered at some time 
subsequent to its $RET. 

In these cases, the prime routine is used to enter 
the request in a revolving queue which the return 
routine must empty before returning to PP. When a 
major pseudo-op routine is given control by the return 
routine because it was primed, its tentacle table has 
the following unique characteristics which remain when 
the pseudo-op routine requests $RET, and are used 
by the return routine to determine subsequent control. 

1. The user is MCP. 

2. The FWA of the last tentacle table used is zero. 

3. The return address is zero. 

The Program Status Table: The program status table 
is a two word table used to record the various modes 
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of PP and MCP. The first word denotes PP status, 
the second MCP status. Both words have the same 
structure: 

Symbol Bits Quantity 



0.0 



SAS 



SQK 



SSIO 



. 0-. 17 Address of the file area table 
corresponding to the lOD 
reference number for which 
$WAIT was requested, if the 
wait is still in effect. If the 
wait is not in effect, it is 0. 

. 25 Auto-stacked bit. 1 denotes 

the program is auto-stacked, 
that it is not. 

, 32-. 49 Interrupt queue count. if 
no interrupts are stacked for 
program. 

. 61 SIO bit. If 1, the program is 

in SIO mode. 



The Logic of the Return Routine 

IC at MCP Level (SL=1): The return routine (Figures 
21,22) is entered at CRETN from the identifier. If 
the IC is at MCP level (SL is one) $RET was requested 
by one of the following: 

1. An MCP auto- stacked routine (I-O fixup). 

2. A major package which was primed. 

3. A major package being used by PP. 

4. A major package being used by another major 
package. 

Considering each in turn (Figure 21), if MCP is 
auto-stacked, the auto-stack bit is reset in the pro- 
gram status table (SPROGS) . MCP may either be in 
SIO mode or not in SIO mode. If in SIO mode, then 
MCP interrupted MCP (MCP is non-SIO at PP level) 
and return is made restoring low registers from 
SLRMCP. If not in SIO mode, there may or may not 
be MCP interrupts stacked. Any stacked MCP inter- 
rupts must be taken, taking a waited interrupt first 
if it has occurred. If MCP is not in SIO mode and has 
no interrupts stacked, then SLRMCP is examined. 
If it is in use, MCP interrupted MCP and return is 
made restoring low registers from SLRMCP. Other- 
wise, control is given to MUPl to attempt return to 
PP. (MUPl logic is described later in this section.) 

If $RET is requested by a major package (not auto- 
stacked), MCP is put in non-SIO mode. If the 
requesting routine was primed, (MCP user, FWA of 
last tentacle table zero), control is given to MUPl 
to attempt return to PP (case 2) . 



H $RET is requested by a major package being 
used by PP, the tentacle table parameters are 
restored as specified, the return address is moved 
from the tentacle table to SICBU, and control is 
given to MUPl to attempt return to PP (case 3) . 

If $RET is requested by a major package being 
used by another major package, the tentacle table 
parameters are restored and the return address 
placed in the low register buffer (STIC) . Conditions 
are set up for return to the routine via the IF analyzer 
(MTC2A), and if no MCP interrupts are stacked, the 
IF analyzer is entered. If MCP interrupts are 
stacked, the unstack routine (KUNSTC) is entered 
(case 4). NOTE: MCP interrupts are unstacked even 
if a SlO'd major package is returning to a SlO'd major 
package. 

MUPl Program: Control is given to MUPl under the 
following circumstances: 

1. MCP interrupted PP and is returning from auto- 
stack with no MCP interrupts stacked. 

2. A primed routine issued the $RET. (Primed 
routines originally get control from MUPl). 

3. The routine which issued the $RET was being 
used by PP. 

At MUPl, control is given to the unstack routine 
(KUNSTC) if any MCP interrupts are stacked. If 
the prime queue is not empty, the next major package 
in the queue must be unprimed before returning to 
PP. Its busy bit is tested. If the routine is busy, 
implying that it released control while waiting for 
I-O activity to be completed and was subsequently 
primed, control is returned to the $RET request via 
the service op return routine. This establishes an 
enabled loop which will continually renew the request 
to unprime the routine while allowing the I-O inter- 
rupt to occur. If the routine is not busy, the param- 
eters are moved from the prime queue to the tentacle 
table, the prime queue controls are adjusted, and the 
tentacle table is set up to indicate that the routine was 
primed. The IF analyzer is then entered at MTCl 
to complete entry to the routine. 

If no routines are primed, the address of the current 
tentacle table (MCR) is cleared (MPPl), and $9 is 
adjusted to refer to the PP program status table 
(SPROGS) . The subroutine JMPPl is entered to 
determine if either $OP, $AD, $USA, or $DS had come 
on simultaneously with an I-O interrupt when PP was 
interrupted. If so, dispatcher error control (SDISP) 
is entered at PP level with the type 14 error code set 
in $14. Otherwise, the subroutine returns, and PP 
is checked for auto-stack or SIO modes. If in either, 
or if it has no interrupts stacked, control may be 
given to PP restoring registers from the backup 
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Figure 21 - The Return Routine - Cbart 1 
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Figure 22 - The Return Routine - Chart 2 



buffer (SLRBU). If PP interrupts are stacked, the 
contents of SLRBU are moved to SLRPP, and an 
interrupt is unstacked. 

If return is to be from the backup buffer, it must 
be examined (CRETBU) to determine that TS and 
EXE are not set. (See the maskable interrupts.) If 
either is on, the corresponding interrupt is faked by 
entry to the parallel interrupt table (SIPT) at the 
appropriate point. If both are off, control is returned 
to PP with registers restored from the backup buffer. 

IC at PP Level (SL=0): If $RET is requested by PP 
(SL=0), the return routine (CRETPP, Figure 22) 
examines the PP auto-stack bit in the program status 
table (SPROGS) . If PP requested $RET in main 
stream, STIC is adjusted to the half word after the 
$RET pseudo-op and the service op return routine 
(KSUPP) is used to return immediately. When $RET 
is requested by PP I-O fixup, PP is taken out of 
stack mode. Then, if PP is in SIO mode and waiting 
for an interrupt, the search subroutine (KSERCH) is 
entered to determine if the waited interrupt has been 
stacked. If it has, it is unstacked and control given 
to the receptor at KINTTY. If PP is not in SIO mode 
and has interrupts stacked, one is unstacked: either 
the one waited (if PP is waiting and the waited inter- 
rupt has occurred) or the next one to be unstacked. 

If PP is in SIO mode and not waiting, or not in SIO 
mode and has no interrupt stacked, the routine 
(CPSNOW) uses the JTSEXE subroutine to determine 
if the TS indicator had been set in SLRPP since the 
I-O interrupt, or if the EXE indicator had been set 
with the I-O interrupt. In either case, the interrupt 
is faked by entering the parallel interrupt table (SIPT) 
at the appropriate point. (See maskable interrupts.) 
If neither is on in SLRPP, low registers are restored 
from SLRPP and control returned to the location 
specified in SICPP. 

Figure 23 tabulates the exits from the return 
routine. 

Error Control 

The dispatcher error control is entered when errors 
generated by program execution are detected by MCP. 
The routine determines the program responsible for 
the error. If PP generated the error, ABEOJ is 
primed, and a message written on the output tape. 
If MCP generated the error, a message is written 
on the typewriter and a BD, $ executed. 

The error control routine is entered disabled at 
SDISP (Figure 24) with the A8 error code in $14VF. 
If the error occurred at MCP level, or if the error 
is an MCP error (denoted by the magnitude of the 
error code), the console is released and the error 



code is converted from A8 to IQS. It is placed in an 
IQS message which is typed (TYPE XX ERROR), and 
a BD, $ executed. 

If SDISP is entered at PP level with a PP error 
code in $14VF, the MCP mask and boundaries are 
selected, SLRBU is filled from STLR, and MCP level 
is set. ABEOJ is primed, the error code placed in 
the message skeleton, and control given to the short 
message routine (ZSPLPR). 

The error control routine may be entered at 
SDSPDS if PP accomplishes a branch to 40 . /g\ or 
40.40(8). In this case, low registers are saved in 
STLR, error code 16 put in $14 VF, and control given 
to SDISP. 

When the error routine branches to the short 
message routine, the flow of control is predetermined 
all the way to the ABEOJ package. The short message 
routine enters the system print program, a major 
package. The tentacle table for the system print pro- 
gram will have the user bit set to MCP, and the FWA 
of the last tentacle table used will be zero, since 
none was used since PP last had control. When $RET 
is requested by the system print routine, the return 
routine will decide that system print had been primed, 
and examine the prime queue for other primed 
routines. ABEOJ was primed when the level was 
changed, and thus will be unprimed immediately, and 
control never returned to the short message routine. 



Error Codes - Problem Program Errors: 


Error 






Type 


$14VF 


Meaning 


1 


10001.0 


Illegal IF Interrupt 


2 


10002.0 


Pseudo-Op code invalid 


3 


10003.0 


Channel not available 


3 


10003.0 


Unit not available 


4 


10004.0 


lOD invalid, or Unit not 
assigned 


5 


10005.0 


I-O TOE address on lOD 
card invalid 


6 


10006.0 


Request for too many scratch 
tapes 


7 


10007.0 


Control word invalid 


8 


10010.0 


Control word address invalid 


9 


10011.0 


Communication with protectee 
area 


10 


412.0 


Dump format invalid 


11 


401.0 


$Chex linkage specifies an 
illegal address 


12 


402.0 


Unit suppressed 


13 


403.0 


50 maskable interrupts 


14 


404.0 


OP, AD, USA or DS inter- 
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Exit to 



Condi tions 



Registers 
Restored 



Remarks 



KUNSTC 



An MCP or PP interrupt 
must be unstacked. 



(1) If return to a major 
package from a major 
package is being post- 
poned to take an MCP 
intermpt, (STLR) are 
moved to (SLRMCP). 

(2) If return to PP from 
MCP is being postponed 
to take a PP interrupt, 
(SLRBU) are moved to 
SLRPP). 



An I-O table of exits will get 
control in the auto-stack mode. 



KINTTY 



A waited interrupt must 
be taken. 



None. 



MCP or PP is waiting, and the 
waited intermpt has been found 
stacked. 



MTCl 



There are no MCP interrupts 
to be unstacked, but a primed 
routine must be entered. 



Tentacle table linkage 
set up. 



The routine is entered via the IF 
analyzer which sets up entry ad- 
dress and modes. 



MTC2A 



Returning to the MCP routine 
which was using the routine 
that gave $RET. 



Return address set in 
MTC3A. 



When an MCP routine uses another 
MCP routine the latter must per- 
form any necessary saving and 
restoring of registers. 



KSUPP 



Return to location is STIC. 



All by KSUPP from 
STLR. 



Return to linkage at B, $MCP is 
made if the next primed routine 
is busy. Return after the linkage 
is made if $RET is given in PP 
main stream. See the service op 
return routine. 



SDISP 



An OP, AD, DS, or USA 
interrupt occurred simultan- 
eously with the intermpt 
which caused the change to 
MCP level. 



Error code in $14. 



No return will be made. Control 
given to error control. 



Return to 
MCP at 

location of 
intermpt 



$RET given by an MCP fixup. 
MCP has no interrupts to be 
unstacked. 



All from SLRMCP. 



Normal return when MCP is 
interrupted. 



Return to 
PP at 

location of 
interrupt 



No intermpts to be unstacked, 
no MCP routine to be unprimed, 
no unfinished MCP routines, no 
error intermpts. 



All from SLRBU or 
SLRPP. 



Ultimate return, 
Registers restored from SLRBU 
if MCP gave $RET, and from 
SLRPP if PP gave $RET. 



SIPT 
(Parallel 
interrupt 
table) 



TS occurred while in PP fixup 
or at MCP level or EXE 
occurred simultaneously with 
the I-O intermpt. 



All from SLRBU. 



These are treated as maskable 
interrupts. They require special 
handling since they are permanent- 
ly masked on. Entr)' to the para- 
llel interrupt table releases the 
intermpt. 



Figure 23. Exits From The Return Routine 



42 



VCP 
LEVEL 
ERROR 



«««»•«■■»««««««««» 
« RESET THE IF • 
» ISOIC;iTCB. PLT * 

• LOK REGISTERS • 
•IN STLR* 000040* 

• IN STIC. • 



* WHCSE 

EflRCa CODE 
» IN »14 



SAVE INDEX 
RECIS1ERS 
14 ANC 15 



■SET ERBCB CODE 

• FOR CISAELEC 

* E.kCF 



RESET IND. 

SET fCP VASK, 

eOCKOS. fCVE 

(STLB) TO 

(SLREU). 



RELEASE 
ThE CCNSCLE 

SECP 



»»««««*«*««««« 



CCNSCLE 

RELEASE 

CCfPLETE 



•ZSPLPR * 



WRITE ERROR 

MESSAGE Otx 

CCKSCLE 



Figure 24 - Dispatcher Error Control 



Error 






Type 


$14VF 


Meaning 


15 


405.0 


Bad label 


16 


406.0 


Successful B, $MCP 


17 


407.0 


Bad PTOE address 


18 


410.0 


Illegal $COMM first word 
address 


Error Codes - MCP Errors: 


Error 






Type 


$14VF 


Meaning 


75 


3405.0 


MCP setup I-O error 


76 


3406.0 


I-O operation rejected 


77 


3407.0 


File not stacked in interrupt 
queue 


78 


3410.0 


Interrupt queue too small 


79 


3411.0 


Prime queue too small 


80 


4012.0 


MCP error while auto-stacked 


81 


4001.0 


MCP EPGK 


82 


4002.0 


Special assignment error 



The Prime Routine 

The prime routine is used to enter the parameters in 
a revolving queue, and to update the prime queue 
count. The return routine empties this queue, honoring 
the prime request. 



The prime routine (Figure 25) is entered with the 
calling sequence; 
SIC, SPRIMR 
BD, SPRIME 
, $OP 

(Parameter specification as 
for entry via the IF analyzer.) 

After saving index registers through 4, the routine 
adds the pseudo-op code to the base address of the IF 
analyzer operation table to fetch the address of the 
tentacle table. The routine uses the tentacle table to 
determine the number of parameters to be stored in 
the queue, the return address, and the form effective 
control. The tentacle table is not changed. 

The current queue count (MPRMQK) is examined. 
If zero, the prime and unprime control words (MR4, 
MR5) are initialized to insure synchronism. 

The parameter count specified by the tentacle table 
is added to the aueue count and to the linkage address, 
and the resulting return address is stored. If the 
updated queue count exceeds 30 half words, dispatcher 
error control is entered at MCP level with error code 
79 in $14. 

The new queue count is stored (MPRMQK), and 
the current prime queue control word (MR4) is used 
to control storage of the parameters in the queue. 
When the parameters have all been entered in the 
queue, the updated control word is stored, index 
registers through 4 are restored, and control is 
returned (still disabled) to the linkage return address. 
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Figure 25 - The Prime Routine 



SYSTEM OPERATION PROGRAMS 



In order to accomplish its function as system super- 
visor and automatic operator, a substantial portion 
of MCP is devoted to programs concerned with sys- 
tem operation. These programs will be considered 
in three general areas: 

1 . Initial program load - programs concerned 
with getting the system started. 

2. Job control - programs concerned with 
guiding jobs through the system, making absolute 
assignments for symbolic I-O, providing tape 
mounting instructions for the operator, etc. . 

3. System commands - programs concerned with 
requests to change some facet of system operation. 

The initializing program, by its very nature, is a 
one-shot program which must give consideration to 
all aspects of system operation. Two other programs 
are major packages or subroutines of major pack- 
ages. They communicate in the manner previously 
discussed, using the tentacle tables, the priming 
mechanism, and the return routine. (See the Dis- 
patcher.) 

SYSTEM INPUT MODES 

The first step in the study of system operation pro- 
grams is to discuss the characteristics of the system 
input modes and the usage of the system input pro- 
gram. From the point of view of program logic, sys- 
tem input may be classified as either being in over- 
lapped mode or not overlapped (bypass) mode. (Refer 
to the portion of the MCP Reference Manual concerned 
with system modes.) Although there is a distinction 
between on-line and offline overlapped modes, its 
influence on program logic is not as great. 

Overlapped Modes 

In the overlapped modes, the input program has two 
input sources operating at the same time. One source 
is the read tape, which provides jobs to phase 4 of 
job control (JC4) to run, and the other is either the 
scan tape or the card reader, which, provides cards 
to Phase 1 of job control (JCl). JCl makes prelim- 
inary decisions concerning which jobs can be executed, 
and sets up I-O assignment tables to allow tape 
mounting instructions to be given before the job comes 
up for execution. 



The system command package must be sensitive to 
both the source of a command and the mode of the sys- 
tem. Commands encountered by JCl may require 
immediate action, or may have to be deferred until 
phase 4. For example, a COMD, OUTPUT will be 
performed immediately if the source is JC4 or the 
console, but deferred if the source is JCl. 

Bypass Mode 

In the bypass mode, JCl has no function. I-O assign- 
ments are made as the jobs are encountered by 
phase 4 of job control. 

Use of the Input Program 

The system input program provides one system 
pseudo-op, $SCR, which is available to any program. 
This pseudo-op provides cards from the phase 4 
source (the read tape, or the card reader in the by- 
pass mode), provided a job boundary is not encoun- 
tered. The first card of a job is defined as the first 
JOB or COMD card not preceded by a B card (ex- 
cluding T cards). 

The input program provides a special pseudo-op, 
SSCR4, for the benefit of JC4. The SSCR4 pseudo-op 
is a request for the next card. However, it differs 
from $SCR in calling sequence and the meaning of the 
end return. The calling sequence for SSCR4 is: 
B, $MCP 
, SSCR4 
, FWA(I) 
(end return) 
(normal return) 

The SSCR4 pseudo-op is a request for one card; 
thus, no card count is provided, and a partial trans- 
mission is not possible. The end return is given by 
the input program when no cards are immediately 
available from the phase 4 source. This differs from 
the end return for $SCR, which is given when no more 
cards are available for that job. JC4 uses SSCR4 
when it is looking *f or a job card, and only at the 
beginning of a job. 

The input program provides one other pseudo-op 
with an eight valued parameter. This pseudo-op, 
SKOM, is most easily discussed by considering the 
eight sub-types as separate pseudo-ops, as follows: 
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Pseudo- Calling 
Op Sequence 

SCRl B, $MCP 

(3.0) , SKOM 

, SCRl 
A VF, 0.0 

(End return) 
(Normal return) 



SCAN B, $MCP 
(3.32) , SKOM 

, SCAN 
(Normal return) 



SEJSCN 
(1.32) 



B, $MCP 

, SKOM 

, SEJSCN 
(Normal return) 



B, $MCP 

, SKOM 

, (Parameter) 
(Normal return) 



P^inction 

To be used by JCl to 
request the address of 
the next card in the phase 
1 buffer. That address 
will be placed in A. End 
return will be used if no 
cards are available. 

To be used by JCl to 
request the input pro- 
gram to respond to the 
next SCRl request with 
the first card from the 
next job. (SCAN to the 
next job boundary in the 
phase 1 buffer.) 

To be used by JC4 to 
request the input pro- 
gram to respond to the 
next SSCR4 request with 
the first card of the next 
job. (SCAN to the next 
job boundary in the phase 
4 buffer. ) 

To be used by the system 
command program to 
inform the input program 
of a mode change com- 
mand. 



Major 
Package 



Pseudo- Op 



SONL 

(0.0) 
SOFFL 

(.32) 
SBYP 

(2.0) 

SEOF 

(1.0) 
SREW 

(2.32) 

Being major packages, any of the operations previ- 
ously mentioned may be primed instead of entered 
directly. 

JOB CONTROL 

Job control consists of four major packages and their 
subroutines (decode, unassign, assign, move, etc.) 
servicing eight pseudo-ops: 



B, $MCP 

, SKOM 

, (Parameter) 
(Normal return) 



To be used by the system 
command program to 
inform the input program 
of an input command. 



JCl SJCl 

JC4 $EOJ 

$ABEOJ 
SJC4 

Resume Load $RESLD 

The accounting program SLOGl 
aogger) SLOG2 

SLOG4 
Job control will be discussed considering only the 
overlapped mode of operation. It will be shown later 
that operation in the bypass mode actually is a special 
case of overlapped operation. Remember that the basic 
purpose of overlapped operation is to accomplish tape 
mounting for one job while a preceding job is running. 
The following discussion presents the basic concepts 
of preassignment of tape units as done by job control 
in overlapped operation. The actual implementation 
may differ in detail due to various environmental 
constraints. 

Overlapped operation is controlled by phase 1 of 
job control (JCl), phase 4 of job control (JC4) and 
the subroutines, decode, unassign, assign, and move. 
These routines are all tied together by a set of tables 
called the I-O assignment tables. A detailed descrip- 
tion of these tables appears elsewhere in this section. 
For the moment, they will be defined as having one 
entry for each job which has passed through phase 1 
(JCl scanning) but not though phase 4 (JC4 EOJ). An 
entry will be defined as something to identify the job 
and its I-O requirements. Then, the functions of the 
six routines may be defined as follows in terms of 
operations on or for the jobs in the tables. 

Job Control 1: Attempts to keep the I-O assignment 
tables full by taking input Qobs) from the scan source. 

Job Control 4: Attempts to empty the I-O assignment 
tables by taking jobs from the read source and running 
them. 

Decode: On request from JCl , decodes lOD cards into 
an entry in the tables. 

Unassign: On request from JC4 at EOJ, makes the 
I-O devices used by the PP being terminated available 
to assignment. 
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Assign: On request from JC4 at the beginning of the 
next job in the PP reference table, insures that all 
its I-O requests have been assigned; in addition, it 
proceeds down the table assigning leftover tape units 
until either the tape units are all assigned or the tape 
requirements of all jobs in the table have been met. 

Move: On request from JC4, constructs the I-O con- 
trol tables needed to run the next job in the tables. 

Thus, overlapped operation could be pictured as 
JC4 pursuing JCl around the I-O assignment tables, 
one trying to keep them full, one trying to empty 
them, with both making demands on the input pro- 
gram for jobs from different sources. 

Bypass operation can then be considered as over- 
lapped operation with a set of tables whose capacity 
is one job. 

Job Control, Phase 1 (JCl) 

The job control phase 1 major package performs two 
tasks in MCP. First, it enters symbolic information 
into the three I-O assignment tables: PP reference, 
I-O request, and first reel, for pre-assignment of 
I-O. Second, it makes preliminary decisions about 
the executability of jobs. A subsidiary function is to 
dispatch COMD cards to the system command pro- 
gram. JCl may be considered an interface between 
the input program and the decode routine, and between 
the input program and system command package. It 
operates only in the overlapped mode, and scans jobs 
on the phase 1 system input tape. 

JCl is entered when first used, at YCllST, and at 
YCIA on subsequent occasions. It operates enabled, 
and is always entered via the unpriming mechanism 
in the return routine, having been primed by JC4 or 
the input program. JCl uses three other major 
packages and two subroutines, as tabulated: 

Job Control 1 (Figure 26) normally gets control 
from the input program, via the unprimed mechanism, 
when a new job is sensed in the input Phase 1 buffer. 
JCl then examines the B cards in that job until either 
the buffer is empty or the job is fully entered in the 
I-O assignment tables. Normally, then, JCl consists 
of a loop through the calling sequences to the input 
program and the uncode and decode routines. The 
remaining code exists essentially to handle special 
returns from these three routines. 



Special Returns for JCl 

One such return is end return from the input pro- 
gram, meaning that the input buffer is temporarily 



exhausted. JCl gives up control via $RET, with the 
assurance that it will be given control when the supply 
of cards is replenished. 

Another return is error return from uncode, 
meaning one of four things has been detected: (case 
1) a COMD card, (case 2) a T card, (case 3) the first 
non-B card, and (case 4) a real error in the B-card 
in question. Case 1, the appearance of a COMD card, 
is handled by going to the system command routine. 
Error return from this routine, in turn, means that 
the COMD card said REJECT. JCl effects the reject 
by setting the TRJECT (see I-O Assignment) bit to 
one in the PP reference table for the last job. Case 
2, a T card, is ignored by JCl. Case 3, the first 
non-B card, signals that the current job is now com- 
plete in the I-O assignment tables. A final entry is 
made to decode, the input program is instructed to 
scan to the next job, and control is given up via $RET. 
Finally, Case 4, a real error in a B-card, causes 
JCl to enter decode with a reject disposition set, and 
from that point it proceeds as in Case 3. 

A third exception occurs when the decode routine 
comes back with error return. If one of the I-O 
assignment tables is full, SJIFUL is set to one, and 
control is given up via $RET (see JC4). Other decode 
rejects reduce to Cases 3 and 4, as discussed. When- 
ever JCl rejects a job, it gives JC4 a reason for it 
by placing the address of a'4-word diagnosing error 
message in the second word of the PP reference table 
for thit job. This message will then be printed by 
JC4 in lieu of running the job. 

Miscellaneous JCl Functions 

JCl has other miscellaneous functions: 

1. JOB cards, in addition to furnishing an ID for 
the PP reference table , cause JCl to enter the 
accounting program, via SLOGl (see description of 
accounting procedures). 

2. Any TYPE, COMPILE card will terminate 
analysis of the current job, since the following cards 
are only symbolic input. 

3. To accommodate the Fortran IV compiler, lOD 
cards are ignored by JCl if the type field begins with 
$. Such lOD's are treated as T cards. 

4. Before each new job is scanned by JCl, a bit 
(REJJOB. 61) is checked. If this bit is on, an uncor- 
rectible data error has been associated with the 
previous job (see Input Program). JCl will reject 
the previous job just as if a COMD, REJECT has been 
encountered. 

5. The first time JCl is entered (at YCllST) it 
saves the IPL reject count, which is a count of the 
number of jobs to be skipped by JCl and JC4 before 
execution is begun. This count is tested and decre- 
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Name 


Symbo 


Input 


SKOM 


Program 




Input 


SKOM 


Program 





YCICA 



Linkage 

B, $MCP 
, SKOM 
, 3.32 

B, $MCP 

, SKOM 

, 3.0 

, 
End Return 
Normal Return 



Function 

Instruct Input Program to scan to 
next job. 



Request the location of next card in 
the Input Program Phase 1 buffer. 
(Location is placed in YCICA.) 



Uncode 



YUNCOD 



LVI, $14, YIUCXW 
B, YUNCOD 
XW, 

VF, 1.0 @DISP 

, 0($10) 
, YCIDB 
Error Return 
Normal Return 



Verify card, convert, and break out 
into YCIDB. 



Commands 



SCOMD 



B, $MCP 

, SCOMD 

, 1.0 

, YCIDB 

, 
End Return 
Normal Return 



To route COMD cards to the command 
major package. 



Logger 



Decode 



SLOGl 



LDECOD 



B, $MCP 
, SLOGl 
NOP, ($10) 

LVI, $15, $+1. 
B, LDECOD 
VF, YClDB-1. 
CF, 
VF, 

Error Return 
Normal Return 



To give a logger card during Phase I. 



To enter JOB names and I-O requests 
into the I-O assignment tables and 
make a preliminary check on the lOD 
cards . 



mented at the beginning of each job, and jobs are 
skipped until the count reaches zero. They are never 
entered into the I-O assignment tables, and they will 
be ignored by JC4. 

Job Control, Phase 4 (JC4) 



Phase 4 of job control (JC4) has several functions. 
One of its functions is to be the instrument for the 
removal of a job from the computer, involving such 
things as unloading of tapes used by the PP, dumping 
in response to $EDUMP requests, closing of the job^s 



system output file, and several other items. Other 
functions of JC4 all involve the initiation of execution 
of problem programs in response to the B-cards 
which precede every MCP job. JC4 initializes PP 
memory and MCP so that the new job is ready to be 
loaded and executed. It sets up the boundary control; 
in response to lOD cards, it builds the I-O tables for 
the PP; it instructs the operator to mount and dis- 
mount tape reels according to the lOD cards of the 
current job or jobs to be run; from the TYPE card 
it determines the compiling chain (if any) to be used, 
and keeps track of its links; it recognizes and dis- 
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patches COMD cards to the system command routine; 
and finally, it scans and takes appropriate action on 
the I-O assignment tables built by JCl. Thus, JC4 
is partly an end-of-job, mostly a beginning-of-job, 
and only for compilers a eontrol-of-job program. 

JC4 has one entry point, YC4NO, and three pseudo- 
ops associated with it: 

1. $EOJ — the current job (or compiler) has 
finished normally. 

2. $ABEOJ — the current job has finished abnor- 
mally. 

3. SJC4 — the current job does not exist; JC4 has 
been trying unsuccessfully to get a JOB card from the 
input program. 

Both $EOJ and $ABEOJ may be given either by the 
PP or from an MCP major package via SPRIME. 
However, SJC4, occurs only when JC4 primes itself. 
JC4 runs enabled, in the non-SIO mode, and saves 
and restores no index registers. It runs mostly in 
PP memory. 

The only exit from JC4 is a $RET with, however, 
one or more of five pseudo-ops primed previously: 



$RESLD, SJC4, SCOMD, $EOJ, and S JCl. Of these, 
$RESLD is primed normally at the end of JC4 when 
a new job or compiler is ready to be loaded. At this 
point the SLRBU buffer will contain the prcper 
boundary control, the remainder of the buffer con- 
taining all zeros with the exception of the MK and IF 
mask bits. The next pseudo-op, SJC4, is primed 
when JC4 is unable to read a job card. If a COMD 
card were read instead, SCOMD would be primed as 
well. $EOJ is primed whenever JC4 detects an error 
in the job prohibiting its execution. Finally, SJCl 
is primed (along with $RESLD) whenever JC4 sees 
that the 1-0 assignment tables have been filled 
(SJIFUL = 1), and some space has been made avail- 
able again. 

Major Package Pseudo-Ops Used by JC4 

The major package pseudo-ops used by JC4 are 
shown on the following page. 
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Major Package Pseudo-Op 

Input Program SKOM 

Input Program SSCR4 

Input Program $SCR 



Linkage 



Output Program SSPEOJ 



Output Program $SPR 



Dump 



Disk Fetch 



$DUMP 



$FETCH 



Logger 



Logger 



SLOG2 



SLOG4 



B, 


$MCP 


, 


SKOM 


' 


1.32 


B, 


$MCP 


) 


SSCR4 


) 


YBCBU 


End Return 


B, 


$MCP 


, 


$SCR 


) 


YBCBU 


> 


1 


) 





End Return 


B, 


$MCP 


' 


SSPEOJ 


B, 


$MCP 


> 


$SPU 


) 


YBCBU 


> 


1. 


B, 


$MCP 


J 


$DUMP 


) 


YEDLL 


B, 


$MCP 


, 


$FETCH 


(AX)DD(BU,48,6), 


J 





) 


YBCBU 


} 


15. 


9 





B, 


WRESTR 




NOP 


B, 


$MCP 


f 


SL0G2 


B, 


$MCP 


J 


SLOG4 


NOP, 


YBCBU 


NOP, 


YJCDBU 



Function 

To "scan" to the 1st card of the 
next job. 



To ask for the 1st card of a job. 



To ask for other B-cards in a job. 



To empty the buffers and write a 
tape mark on the system output tape. 

To write a job card on the output 
tape. 



To dump according to $EDUMP 
formats in case of $ABEOJ. 



To get LIM and lOD cards for com- 
pilers and compiled PP's. 



.X 



To signal end-of-job to a logger. 



To give a logger CC and A8 JOB 
cards at beginning of job. 
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JC4 Service Ops and Subroutines 

JC4 also uses the following service ops and sub- 
routines: 



Name 
Commentator 



$TIME 



Short Message 



Symbol 

$COMM 

$TIME 
ZSPLPR 



Linkage 

B, $MCP 
, $COMM 
, YC4CM 
CF, 4.0 

B, $MCP 
, $TIME 
VF, YC4CM2 

SIC, ZSPLP9 
BD, ZSPLPR 

, WSPLL 

, 9.0 



Function 

To print on-line a beginning of job 
message. 



To put the time of day into the afore- 
mentioned message. 



To print the job card on the output 
system tape. 



Prime Routine 



Return 



Major Package 
Fetcher 

A 6 to IQS 
Conversion 



SPRIME 



$RET 



YMPFCH 



SA6IQS 



SIC, SPRIMR 

BD, SPRIME 

, ($0P) 

B, $MCP 
, $RET 

LX, 1, YXWEJM 
B, YMPFCH 

LVI, 15, $+1. 
BD, SA6IQS 
VF, YJCDBl+1. 
CF, 8 
VF, YC4CM1 



To prime one or more other pack- 
ages, such as SCOMD. 



To return. 



To get itself into memory from disk. 



To get the JOB name into IQS. 



Breakdown 
Routine 



SBRK8 



YPCCT 



LVI, 15, $+1. 
BD, SBRK8 
VF, YUCBF1+.6 
CF, 71. 
VF, YUCBF2 
CF, 
(error return) 



To get the com.piler names in a chain 
broken out, and ready to put into 
KSILO. 
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JC4 Routines 

The preceding routines are outside Job Control. 
The following routines are all basically a part of JC4. 



Name 
Decode 



Assign 



Move 



Uncode YUNCOD 



Card Code SCA6 
to A6 Con- 
version 



Symbol Linkage 

LDECOD LVI, $15, $+1. 

B, LDECOD 

YDECVF VF, 

CF, 7 

VF, 

B, YICER2 

TASIGN LVI, $15, A 

B, TASIGN 
A XW, 

TMOVE LVI, $15, B 

B, TMOVE 

B XW, C, D, E, F 

(error return) 

LVI, $14, A 

B, YUNCOD 

A XW, B, C, D 

VF, DISP 

, F(J) 
(error return) 

LVI, $15, $+1. 

BD, SCA6 

LVE, , SJCTWS 

CF, 80 

VF, YUCBFl 



Function 

To enter I-O requests when in the 
bypass mode or for compiler lOD 
cards . 



To assign I-O requests, in both 
bypass and overlapped modes. 



To construct I-O tables for the next 
job to be run. Secondly, to clear out 
a slot in the PPREF table. 



To verify, convert, and break out 
card designated by disp, and put 
information in A and F(J). 



To convert compiler names to BCD. 



Unas sign TJUNAS 



JC4 Print YPR 



Read From YRDFSO 
Source Routine 



LVI, 15, A 
B, TJUNAS 

LVI, 1, A 
SIC, YPRRET 
B, YPR 

SIC, $15 
B, YRDFSO 
, YBCBU 



To clear the I-O tables and get 
ready to assign new job or compiler. 

To print error diagnostics on or off 
line on a selective basis for each 
installation. 

To get an lOD card from $SCR, disk, 
or core. 
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JC4 Operations 

JC4 will be described in 6 general areas: end-of-job, 
beginning-of-job, bypass I-O assignment, overlapped 
I- O assignment, compiler control, and error control. 

End- of- Job 

The code from the entry point of JC4, YC4NO 
(Figure 27), through YC4B2 is essentially concerned 
with terminating the previous job. First, to prevent 
the operator from entering spurious EOJ commands 
through the console while JC4 has control, the initial 
entry bit to the loader is checked to make sure the 
entry is valid. Next, the PP's 1-0 location table is 
checked to make sure that JC4 will not conflict with 
PP I-O when it calls itself in from disk. If $ABEOJ 
was the pseudo-op, the dump prc^ram is entered and 
YEOJS and SPINCL are set accordingly. YEOJS, if 
set to one, will prevent further compiling and SPINCL 
affects the conditional saving of tapes in SFREE (see 
Unassign). After calling itself in from disk, JC4 
checks the op code for SJC4 to skip the end-of-job 
procedure if it has already been effected, i. e. , JC4 
is looping waiting for a new job card. 

The next step is to reset SSYRFT, the temporary 
arc assignment pointer, to SDKMCP, the permanent 
reset arc (see description of move routine later in 
this section) . Now the compiler routine YC4INT is 
entered if a compiler was running, otherwise, the 
input program is instructed to "scan" to the next 
JOB or COMD card. The PP's I-O is then 
"unassigned", and the output program instructed to 
empty its buffers (SSPEOJ), provided ttiere is some- 
thing in them (YSSPBT = zero). In addition, several 
items are reset, among them the commentator buffer 
(PONOUT) and the maskable interrupt counter 
(YMSCO) . At this point termination of the current 
job is complete, and JC4 is ready to begin a new job. 

Beginning- of- Job 

At YC4B2 (Figure 27), the LFINB bit is checked to 
see if decode is currently processing B cards for 
JCl. If so JC4 effects a waiting loop by priming 
itself and issuing $RET. If this were not done, 
decode might possibly construct a fictitious PPREF 
slot in phase 1, or too large an lOREQ table in phase 
4. The SSCR4 pseudo-op is then used to ask for a 
job card. If the input program gives end return, JC4 
again waits via a prime SJC4-$RET sequence, but 
first it checks SJIFUL to make sure phase 1 is not 
stopped for lack of table space. If the input program 
gives normal return, the card is sent to uncode for 



verification. If it is a JOB card, one more hurdle 
must be passed: the WREJJB routine which checks 
for phase 1 rejects (see JC4 error control). Then 
the job card is converted to A8, given to the logger, 
converted to IQS, and printed and punched on the out- 
put tape. A message is printed, using the commenta- 
tor, with the job name and the time of day. With this 
message, the job is fully annotated, and JC4 turns to 
the succeeding B-cards. Two separate logic flows 
exist, one (for the bypass mode) beginning at YTCSR, 
the other (for the overlapped modes) at WJ4PA. The 
flow converges again at WJC4G. 

Bypass I-O Assignment 

In bypass I-O assignment (Figure 27), the TYPE card 
is read and uncoded using the Uncode routine. If it 
contained COMPILE or COMPILGO, the compiler 
set-up routine is entered at YCOJBl. If not, the 
LIM card is read at YC4B5. The read source routine 
is used because the flow is rejoined at this point for 
compiler LIM and lOD cards. The limits are saved 
in all the necessary places: YEDLL, the $EDUMP 
buffer; SLRBU, the eventual boundary control regi- 
ster; and SMARK, to establish the upper extent of the 
PP's I-O tables. Before the upper limit is used to 
establish the PP I-O location table base address 
(SBAPP), JC4 makes sure it is greater than YMAX, 
to prevent any possible memory conflict. The next 
step by JC4 is to string out all the lOD cards in mem- 
ory in the format required by the decode and m.ove 
subroutines. This is done in a loop beginning at 
YIODSO (Figure 28) which is broken normally when 
the first binary card is encountered. The code from 
YC4C9 to WJC4G effects successively the decoding 
of the lOD and REEL cards, the actual I-O assign- 
ment, and the construction of tables by Move. This 
whole sequence is skipped for jobs with no lOD cards. 
At the end SCORG is checked so that special action 
may be taken for compiler at YC4INT. 

Overlapped I-O Assignment 

This logic starts at WJ4PA (Figure 29) by checking 
the TYPE card, as in the bypass mode. It proceeds 
to YCOJB if compiler setup is necessary. At WJ4PF 
the read source is set to $SCR, because WJ4PFF is 
the entry point for go phases of overlapped COMPILGO 
jobs. Now the logic differs from that of the bypass 
mode. Since the lOD cards were decoded by JCl, 
the PP is ready to be assigned. If aU goes well, the 
LIM card will be read (at WJ4PG) and uncoded. If 
assignment comes back with a reject, a diagnosing 
message will be printed. After uncoding the LIM 
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card, the overlapped mode logic borrows some by- 
pass code, at YLl, to process the limits. The by- 
pass code returns to WJCV-1.0 at which point JC4 
goes into a loop from WJCV to WMOVIO+1.0 (Figure 
30), to "move" the lOD and REEL cards. In addition 
to constructing I-O tables for the PP, Move checks 
the job name against the name in the PP reference 
table, and steps the TPPRUN pointer to the next table 
slot (see I-O assignment). It is therefore necessary 
for JC4 to enter Move even if there are no lOD cards. 
This is done at WTEST, the normal exit from the 
loop, if the initial entry to Move is still on. When 
the lOD cards are exhausted, the overlapped mode 
logic rejoins the bypass logic at WJC4G. 

Compiler Control 

During their execution, compilers are treated by 
MCP exactly as any other problem program. How- 
ever, JC4 treats them in a special way for three 
reasons: (1) their binary decks, LIM and lOD cards 
are in PROSA on the disk, (2) they may be chained 
together, (3) their output may be executable programs 
(COMPILGO). Because of reason 1 above, JCl does 
not scan the LIM and lOD cards in the overlapped 
mode, meaning that lOD cards must be decoded and 
assigned from scratch by JC4. Therefore, all 
compiler lOD's are assigned by JC4 in the bypass 
mode. When a COMPILE or COMPILGO TYPE card 
is uncoded by JC4, the compiler setup routine is 
entered at YCOJB (overlapped mode) or at YCOJBl 
(bypass mode). At YCOJB (Figure 30), JC4 must 
first determine whether the job was pre-rejected by 
JCl (TRJECT = 1). A COMPILGO job will be run in 
the compile phase in this case only if the pre-reject 
was due to decode, and both list and punch options 
called for, since the compiled deck may then be 
easily corrected. Otherwise, the pre-reject will be 
diagnosed at WJ4PFF (I-O assignment will return 
with reject disposition set). If the job Is a COMPILE 
job and was not pre-rejected by JCl, the TPPRUN 
pointer is stepped by entering Move at YCPREJ. 
This must be done to keep the pointer in phase with 
the jobs being executed, since a slot for this job was 
created by JCl. The compiler setup begins in ear- 
nest at YCOJBl. After fetching the processor chain 
type-area for the compiler chain named on the TYPE 
card, JC4 converts the individual compiler names to 
BCD and "breaks out" the names in order to set up 
the communication region. When KSILO is initialized, 
JC4 sets up $13 to cause the read source routine 
(YRDFSO) to transmit LIM and lOD cards from lower 
memory. The bypass logic for I-O assignment is 
then entered at YC4B5. 



The code beginning at YC4INT (Figure 31) performs 
the loading of the next compiler in the compiling 
chain. It is entered whenever a compiler gives $EOJ 
or $ABEOJ, and when the I-O has been assigned 
initially for the chain by JC4. It will terminate 
compilation immediately if an abnormal EOJ is given 
(YEOJS = 1), proceeding, if the job is an overlapped 
COMPILGO, to Move at WJC4Q to advance TPPRUN 
over the GO phase. Otherwise, KSILO, YDFCS and 
$13 (read source) are set appropriately, and exit is 
made to WJC4G. The flow continues to YLASTC when 
the last link in a chain has run, at which point it 
might be necessary to run the GO phase of a 
COMPILGO job. This is accomplished (after setting 
the necessary parameters) by branching to the appro- 
priate logic (overlapped or bypass) by way of Unassign, 
going directly to YLl for BSS jobs. 

Error Control 

Much of the JC4 code exists to handle error returns 
from the various subroutines of JC4. These error 
returns may be categorized as follows: 

1. B3?pass and compiler errors 

2. Overlapped errors 

a. Before I-O assignment 

b. During and after I-O assignment 

3. Special (WREJJB) 

In Case 1, a message diagnosing the error is 
printed via YPR, followed by an exit to YRESTR 
(SYN, WRESTR) , which sets the YEOJS and SPINCL 
appropriately and exits by priming $EOJ and giving 
a $RET (Figure 32). Case 2a is handled similarly, 
except that here the TPPRUN pointer must be stepped 
past the current job. This is accomplished by exiting 
to WJC4Q, which goes to Move and then to YRESTR. 
Error returns from Assign and Move make up Case 
2b. Here the TPPRUN index will already have been 
stepped (although Move normally steps TPPRUN, 
Assign does it when the job is pre-rejected or 
rejected in Assign). JC4 diagnoses Assign rejects 
by picking up the address of a message from the 
TPREFT slot, the address of which in turn is found 
in TNEXT (see JCl) . 

Finally, the WREJJB routine is entered each time 
the first non-COMD card of a job is read. First, 
the IPL reject count (SREJJB) is checked. If it is 
non-zero, it is decremented, and the job skipped 
over by exiting to YRESTR. TPPRUN is not stepped, 
because no entry was made by JCl. If it is zero, the 
current job in the PP reference table is checked for 
YTRB = 1. If it is, it means that although the job 
was entered in the tables by JCl, the input program 
was unable to bring it to phase four (repeated tape 
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failure, tape breakage, etc.). The TPPRUN index 
must therefore be stepped over the current slot. 

Symbols 

JC4 uses the following symbols in MCP: 
In the communication region for IPL: 

Used Modified 



SCHANS 

SBAPP 

SMAXRN 

SDKMCP 

SSYRFT 

SHARK 

SROOF 

SJCTWS 



X 

X 
X 
X 
X 

X 

X 



X 

X 
X 



SCOMRG: 



SPINCL 

SYSMOD 

SCORG 

SJIFUL 

SJBUSY 



SCNFCG 

SSPFIX, 
STSBIT 



Job incomplete if zero (SFREE). 

Bypass if 1, overlapped if zero. 

Compile if 1, go if zero. 

JCl stopped if 1. 

Set to 1 by JC4 when job card is read, 

to zero when $EOJ, $ABEOJ is 

received. Inhibits COMD, EOJ and 

COMD, ABEOJ when on. 
If 1, sends I-O assignment through 

configuration change code. 



Reset to zero by JC4 (see maskable 
interrupts) . 
In the parameter pool: 



YMISCO 



reset to 



SLRBU 



BREADS 



Maskable interrupt counter, 

50 by JC4. 
Set up initially by JC4, transmitted to 

PP's lower registers by $RET 

routine. 
Read source word used to Indicate 

source for cards to $RESLD. See 

$RESLD. 
The following symbols are used by JC4 to communi- 
cate with other programs: 
REJJOB+. 60 - Reset to zero by JC4, tested by resume 

load. See $RESLD. 
Words 0-2 are used by the commentator 

as the 1st three words of every write. 

They are reset to zero by JC4. 
The debugger's hold bit is reset by JC4. 
The $EDUMP buffer is set up initially 

by JC4 from the PP's LIM card. 
JC4 saves the type-area to be used by 

resume load here. 



PONOUT 



PHOLDB 
YEDLL 

YDFCS 



YLI^AV 



YTBIT 



KSILO 



LFINB 

YUCBFl, 
YUCBF2 - 



Contains loader limits for the PP and 
initial entry bit (.25) set to one for 
resume load. 

YLLSAV. 57, indicates a T-card has 
been read. 

The communication region referred to 
by $FECRG and $STRG and used by 
JC4 in compiler control. See the 
service routines, $FECRG, $STRG. 

Defined by decode, inhibits JC4 from 
starting a job when set to zero. 



Uncode buffers, referred to directly by 
JC4. 

YTRB - Bit defined in the 1-0 assignment 

TPREFT table. Set to one by JCl 
if the input program lost the corre- 
sponding job. Tested by JC4 in 
WREJJB. 

TPPRUN - Contains TPREFT address of next job 
to be run. (See move) 

TNEXT - In case of assign reject, contains 
address of TPREFT slot of the 
rejected job. 
The symbols below are used internally by JC4: 

YEOJS - Set if JC4 receives $ABEOJ. Tested in 
compiler control section (YC4INT). 

YSSPBT - Set to one by JC4 if job rejected for no 
job card. Prevents SSPEOJ on next 
entry and subsequent double tape mark. 

WJ0R2 - Buffer used by JC4 for JOB and COMD 
cards in broken out A6 code. 

YC4SMB - Buffer used to format most JC4 error 
messages. 

WSPLL - Buffer for A 8 JOB card. 

YBCBU - Buffer used to read cards into. 

Finally, YJCEM through YJIFUL are the JC4 error 

messages. Their order should remain inviolate 

because of the code at YCOJB. 

Job Control Subroutines 

This section describes job control subroutines, 
including those that actually perform a job control 
function such as Decode, Assign, Move, etc. , as 
well as those used for such basic tasks as code con- 
version, even though the latter are not functionally a 
part of job control. 

The Uncode Routine 

At many points in job control 1 and 4 it is necessary 
to verify a B card, convert it to BCD, and get infor- 
mation from it. The uncode subroutine was written 
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Figure 33 - The Uncode Routine 



to perform this function. The uncode routine is used 
with the following linkage: 
LVI, $14, A 
B, YUNCOD 
A XW, B, C, D 

VF, Disp 
, FWA(I) 
, RA(J) 

(Error Return) 
(Normal Return) 
where: 

Disp denotes the type of card expected: 
0.0 - TYPE 
1.0 - JOB 
2.0 - LIM 
4.0 - lODorREEL 
FWA(]) is the location of the card. 
RA(J) is the location where the converted card is 
to be put. If RA(J) = 0, no transmission is 
desired. 
Error return signifies that the card designated by 
Disp was unidentifiable or contained in uncor- 
rectible error. 
Normal return signifies that the card designated 
by Disp has been recognized, converted, and 
processed. 
For a normal return, the XW at A will contain 
information according to Disp: 

Disp B CD 



The remainder of Uncode consists of three routines 
to extract information from TYPE, LIM, and lOD or 
REEL cards. The TYPE card routine has an exit to 
JC4 if an UPDATE was encountered in the bypass 
mode. A TYPE, UPDATE card causes uncode to set 
loader limits to their maximum, the read source ($13) 
to $SCR, and SCORG to 1 (compile). When the 
$RESLD package gets control, it will be set up to load 
C and P cards directly into MCP. Otherwise uncode 
sets up communication region (KSILO) bits 1.18-1.22 
in the calling sequence. JC4 gets the actual compiler 
name from YUCBF2, the breakout buffer. The LIM 
card routine converts the limits from BCD to binary, 
and verifies that they do not violate MCP memory. 
Note that the checking allows for the possibility that 
MCP might occupy lower rather than upper memory. 
The lOD card routine sets up the lOD information in 
the format required by the decode and move sub- 
routines. 

Data and storage used by Uncode are: YIDX12 and 
YUCX12 are used by the lOD and LIM card routines, 
respectively, to convert numbers from BCD to binary. 
YUTOE is the symbolic location of the reference 
number on a BCD lOD card. Cards are converted to 
BCD into YUCBFl and broken out into YUCBF2. 
YGOMK through YFORTR is the uncode symbol table. 
Uncode also uses ABSSID, a data entry in the loader, 
and YNLST and YNOPUN in the JC4 compile and go 
subroutines. 



TYPE 



JOB 



LIM 



Lower 
limit 



Bits 1.18-1.22 
in communication 
region 

Number of fields 

Upper limit 



lOD/REEL Absolute Number of 
exit fields 



I-O 

reference 
number 
Uncode (Figure 33) uses two subroutines, SCA6 and 
SBRK8, respectively to convert the card to BCD, and 
break out the fields into consecutive full word loca- 
tions. (A field is defined as a collection of charac- 
ters, none of which is a comma, bounded on the left 
by a comma or column 9 of a card, and on the right 
by a comma or column 63 of a card. ) The first field 
is compared against its mask in the table at YTYPMK. 
If the comparison is successful, further information 
must be extracted from the card. If not, error 
return is given, and no information is transmitted, 
unless a JOB card was expected. 



Decode, Assign, Move 

These three subroutines perform key functions in 
moving jobs through MCP. Decode sets up I-O 
assignment tables in phase 1 (or phase 4 bypass). 
Assign associates physical I-O units with symbolic 
I-O requests, assigning tape units as far ahead as 
possible. Move sets up the I-O controls to run the 
immediate job. 

I-O Assignment Tables: The I-O assignment tables 
are the PP reference table, the I-O request table, 
and the first reel number table. Decode, Assign, 
and Move are concerned with setting up or responding 
to these tables. 

THE PROBLEM PROGRAM REFERENCE TABLE 
(TPREFT): This table -has one two-word entry for 
each PP which has arrived at phase 1 but has not 
been run. The length of the table is controlled by 
the parameter TPPC, the number of jobs allowed in 
the table plus one. Presently this parameter is set 
at 21, to handle 20 problem programs, (e. g. , one 
in phase 4, and ten on each of two input tapes.) 
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The table control words are as follows: 
TPPREF — a constant index word for the 

TPREFT table, used for refill. 
TPPRUN — an index word pointing to the next PP 
to be run. 
The format of the first of the two 64-bit words for 

each PP is as follows: 

TCRREF ~ 18 bits, an address of the first word 
used within the I-O request table for 
the PP. 

8 bits, is the number of words used 
within the 1-0 request table for the 
PP. 

1 bit, is zero if the PP has not been 
run or processed. It is one if the PP 
has been run. 

1 bit, is zero if the PP has not been 
rejected, a one if the PP has been 
rejected in phase 1. 
1 bit, is zero if any one or more of 
the I-O requests are not pre-assigned 
for the PP, is one if all requests 
have been pre-assigned for the PP. 
1 bit, is zero if this word is not the 
last plus one entry within the 
TPREFT table, is one if this is the 
last plus one entry made by decode 
within the TPREFT. 
12 bits, contains the largest refer- 
ence number found on any one of the 
lOD's submitted for this PP. 
12 bits, the total number of lOD's 
submitted to decode for this PP. 
The second of the two words, TPNAME, is the 

name of the PP taken from the first 8 characters of 

the JOB card in A6 format. 

THE I-O REQUEST TABLE (TIOREQ): This table 
contains one word for each unique I-O unit requested 
by the PP. The length of the table is controlled by 
the parameter TIOC, which is the maximum number 
of problem programs multiplied by an estimated 
average number of units used by each problem pro- 
gram. Presently the parameter is 80. The format 
of each word is as follows: 

TASGNI — 1 bit, is zero if this request word 
(0.0) has not been pre-assigned, and will 

be set to one when pre-assignment 
has been made. 
TUNOBT — 1 bit, is zero for normal pre-assign- 
(. 1) ment case. It will be set to one if 

this request was once pre-assigned 
and the unit to which it was pre- 
assigned was taken from the machine 
configuration. 



(0.0) 

TUNCT 
(.28) 

TJBPRO 
(.36) 

TRJECT 
(.37) 

TASGNP 
(.38) 



TLPPEN — 
(.39) 



TLREFN — 
(.40) 

TIODCT — 
(.52) 



TPRINT — 1 bit, set to one when (if tape request) 
(. 2) the tape mounting message has been 

sent to the operator via the commen- 
tator. 
TYPE — 4 bits, indicating the equipment types 
(. 3) being requested. 

0001 - Disk request 

0010 - Console request 

0011 - Card reader request 

0100 - Card punch request 

0101 - Printer request 
1000 - Tape request 

TABSUN — 3 bits, indicating the absolute unit 
(. 7) number to which the request has been 

assigned. (Multi-unit channels only. ) 
TRLSYM — 7 bits, is a number relative to a posi- 
(. 11) tion within the symbolic channel table. 

Hence, this number is relative to the 
symbolic channel field of the lOD card 
which is used for channel separation. 



TLAST — 1 bit, indicates the last plus one 
(. 18) word of this I-O request table, used 

only to note when to refill the value 
field of the TIOREQ tables control 
index. 
TIODSQ — 9 bits, denotes the sequence in 
(. 19) which the lOD for this request was 

received. 
TFREEL — 18 bits, is the cross-reference 
(. 28) address of the reel label within the 

TFSTRE table. (Tape lOD's only) 
TABSCH — 18 bits, is the absolute channel 
(. 46) address (to locate the Channel Status 

Table) to which this request has been 
assigned. 

THE FIRST REEL NUMBER TABLE (TFSTRE): This 
table contains one word for each reel label requested 
by a REEL card. The reel label is 8 characters long 
and is in A6 format, using only 48 of the 64 bits. 
The size of the table is determined by the parameter 
TFRC, presently 50. 

The table entry, TREELN, is the name of the tape 
reel to be mounted on a tape unit. The first three 
characters specify whether the tape is labelled or 
unlabelled and whether the tape is protected or not 
protected. The remaining five characters are the 
label. 

The preceding three tables are duplicated to handle 
problem programs in the bypass mode. They are 
only for one job, however, and the table sizes are 
chosen accordingly. The formats of the tables are 
the same as for the overlapped mode. 



66 



Table Usage: The usage of these tables is summa- 
rized as follows: 

PROBLEM PROGRAM REFERENCE TABLE 
(TPREFT): 





Decode 

S 


Assign 

US 


Move 


TCRREF 


US 


TUNCT 


S 


us 


US 


TJBPRO 


RE 


cs 


CS 


TRJECT 


RE 


cs 


CS 


TASGNP 


RE 


cs 


US 


TLPPEN 


S 


us 


US 


TLREFN 


S 


NU 


US 


TIODCT 


s 


NU 


US 


TPNAME 


s 


US 


us 



S = Set (most cases set to not zero). 
RE = Reset (most cases set to zero). 
CS = Conditional set. 
US = Used but not modified (conditional) . 

NU = Not used, not modified. 

NR = Not used and reset. 

UR = Used and then reset (conditional). 



I-O REQUEST TABLE (TIOREQ): 
Decode Assign 



Move 



TASGNI 


RE 


CS 


NR 


TUNOBI 


RE 


CS 


NR 


TPRINT 


RE 


CS 


NR 


TTYPE 


S 


US 


UR 


TABSUN 


RE 


CS 


UR 


TRLSYM 


CS 


u 


UR 


TLAST 


US 


us 


UR 


TIODSQ 


S 


NU 


UR 


TFREEL 


CS 


us 


UR 


TABSCH 


RE 


cs 


UR 



THE FIRST REEL TABLE (FSTRE): 

Decode Assign Move 



TREELN 



CS 



US 



UR 



The Decode Routine: The decode routine is used by- 
job control to enter information from lOD and REEL 
cards into the 1-0 assignment tables. It is entered 
by JCl in the overlapped modes, and by JC4 in the 
bypass mode, with the following linkage: 



LVI, 15, X 
B, LDECOD 
X VF, ALPHA 
CF, B 
VF, C 

error return 
normal return 
where ALPHA locates the information (see following), 
B identifies the system mode (zero is overlapped, 
non-zero is bypass) , and C is used to contain the 
error code in the event the error return is used. 

The table at ALPHA contains the information for 
the lOD or REEL card as follows: 
Location Content 



A LP HA- 1.0 
ALPHA (.28-. 46) 

(.52-. 63) 
ALPHA+1.0 
+2.0 
+3.0 



Job name in A 6 code. 

Number of broken out fields 
following. 

lOD reference number. 

lOD or REEL. 

Type or first label. 

TOE or second label etc. . 
When all the requests for a job have been proc- 
essed, decode must be notified in order to separate 
I-O requests from successive jobs. This final entry 
is accomplished by setting the word at ALPHA+1.0 
to zero. Also, after several entries have been made 
in the tables, it may be necessary to reject the job 
and clear these entries. This is accomplished by 
setting bit .26 of X in the linkage and using the final 
entry procedure. This bit must be zero for a normal 
entry. 

The decode routine will use the error return for 
one of two reasons: 

1. The lOD or REEL card is invalid. The corre- 
sponding error codes are: 

5.0 A REEL card following a non-tape lOD. 
Invalid type field on lOD 
Two lOD's requesting infinity disk on 

the same channel. 
The first card submitted was not an 

lOD card. 

2. One of the I-O assignment tables is full. The 
error codes used are: 

1.0 The PP reference table is full. 
2.0 The I-O request table is full 
3.0 The first reel table is full. 
The I-O request and first reel tables will be cleared 
for the job in question prior to the error return when 
the error is due to the first reason. When error 
return is given to JCl for the second reason, JCl 
sets SJIFUL and issues $RET. 

The decode routine (Figure 34) checks the system 
mode to set up the program for the correct table 



6.0 
7.0 

8.0 
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Figure 34 - The Decode Routine 



entry. A mode change is allowed only between jobs.- 
If the entry is an initial entry, the routine clears and 
sets up certain internal tables. Then, if overlap, a 
check is made to see whether or not a slot is available 
within the PP reference table (PPREF). If not, a 
type 1 condition is set up in the linkage, indicies are 
restored, and the error return is made. If a slot is 
available, the program proceeds to check if the entry 
is a final entry (IOD/REEL zero in ALPHA+1). If so, 
the PP to be entered is a PP without lOD cards, or 
possibly a PP that was rejected by job control. 

If the entry is not a final entry, the flow follows 
one of two paths depending on whether the card is lOD 
or REEL. If it is lOD (LIODRN), the I-O request 
table is checked for room, and LIODTP entered if the 
type is tape. A tape lOD has both channel and unit 
fields for separation, while the remaining 1-0 types 
have only a channel field for separation. The I-O 
request table (TIOREQ) is then set up with proper 
entries. For each non-tape lOD card with a unique 
type or channel field, there will be an entry made 
in the TIOREQ table. For a tape lOD an entry will 
be made in the TIOREQ table for each lOD card with 
a null channel and unit field, and each lOD card with 
unique channel and unit fields. In the case where 
channel fields are alike and unit fields differ a 
TIOREQ table entry is made requesting the same 
channel as the previous lOD card with that channel. 
Making a table entry consists of setting up the 
following fields in the TIOREQ word: 

TYPE identifying the equipment type. 

TRLSYM for channel separation (tape only). 
TIODSQ the sequence number in which the 

lOD was received. 

If the lOD card has a TYPE field requesting a disk, 
a check is made to see if it is an illegal request for 
infinity disk. If so, the error return is made. Other- 
wise, a normal return is made. 

If the card is a REEL card, it will be processed 
only if it is the first REEL card following a tape lOD. 
If the last lOD was not a tape lOD, the error return 
procedure is followed. If the card is not the first 
reel card for the lOD, it is ignored, and the normal 
return made. (On a single unit, mounting instructions 
for tape reels other than the first are of no value 
until PP has finished with the first. Since this will 
not happen until phase 4, pre-assignment is complete 
when the first reel is called for.) 

If the REEL card is acceptable, the reel label is 
entered in the first reel table, and its address in the 
I-O request table. A normal return is made. If a 
final entry is made and the rej ect bit is off, the PP 
reference table entry is made for this PP. These 
entries are defined in the preceding section on I-O 
assignment tables. 



When an invalid card is detected or a reject request 
is received, the program (LERROR) clears any entries 
it had made in the I-O request and first reel tables for 
this job, and sets the reject bit in the PP reference 
table. 

The Assign Routine: "The assign routine pre-assigns 
the problem program requests which were submitted 
through lOD cards. This enables the operator to set 
up in advance the tape units to be used by the problem 
program. The set up of tapes as far in advance as 
possible optimizes set-up time. The basic rule used 
for assignment is to utilize all tape units when they 
become unassigned. At assign time, all requests are 
checked for adherance to the machine I-O configura- 
tion. If there are any discrepancies, the problem pro- 
gram will be rejected. The assign routine is entered 
from JC4 with the linkage: 

LVT, $15, Y 

B, TASIGN 
Y XW, A, B, C 

(Return) 

where 

A is the status of the machine: 

- no configuration change has taken place. 
7^0 - configuration change has taken place. 
B is the exit disposition: 

- next PP has been assigned successfully 
and is ready for Move. 
7^0 - next PP has been rejected and cannot be 
given to Move. 
C is the Assign entry mode: 
- overlapped mode. 
7^0 - un overlapped mode. 
Assign uses SA8IQS to convert and $COMM to output 
messages to the operator. 

Upon entry to Assign, (TASIGN, Figure 35) the 
first check made is whether or not a machine configu- 
ration change took place since the last time the assign 
routine was entered. Conditions for stating a con- 
figuration change must be set by job control for the 
initial entry to Assign in order that the necessary 
tables for I-O validity checking be set up. The con- 
figuration change section performs the following 
functions: 

1. All requests reserving units that have become 
unavailable due to a machine configuration change, 
must be relieved of these units. At the same time 
these relieved requests must be marked so that they 
have priority in re-assignment (pseudo-unoverlapped). 

2 . The equipment count is generated for the validity 
check table. This table contains the equipment code 
and count and a zero field for the requested count 

for a PP. 
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3. The multi-unit count table is generated. This 
gives the total number of tapes on a channel. The 
format of the table is half-word: .0-. 17 the channel 
number and . 18-. 21 the unit count. Along with this, 
the largest count per channel is stored for PP request 
checking. 

Upon returning from the configuration change sec- 
tion (or if there was no change) , a mode check and 
set up is made. If the mode is overlapped, the index 
pointing to the PP reference table is set to the next 
slot in the table. This contains the information about 
requests which have not been completely assigned. 
If the mode is unoverlapped, this index will be set to 
the unoverlapped table. 

The Assign routine refers to the PP reference table 
to get the information about the PP: rejected, com- 
pletely assigned or already processed. If the PP is 
accepted, the table contains the cross reference 
address to the I-O request table and, if any I-O was 
requested by the PP, the count of the number of 
individual units requested. This count is used to set 
up the minor index (TIXA) which is used for scanning 
the I-O request table. With the exception of the print 
bit, the information was computed and stored in the 
I-O request table by the decode routine. Information 
pertaining to the assignment of a unit, such as the 
absolute channel address, the absolute unit number 
and the assigned bit, are computed and stored by the 
assign routine. The unoverlapped bit that appears in 
the I-O request table is a special indicator denoting 
the fact that this request was once assigned and was 
dis-assigned due to a machine configuration change. 
When the unoverlapped indicator is on, this request 
has top assignment priority and if there is no unit 
available to satisfy this request, the assign routine 
will reject the PP. If there is a unit available 
assigned to a request of a PP that is to run at a later 
time, then the assign routine wUl relieve that PP of 
the unit and give it to the top priority request. The 
PP that lost the unit to the priority request will be 
assigned a unit as soon as one becomes available. 

The first reel table is used to provide the first label 
or reel name for the mount message. This message 
is printed as soon as there is a unit available for the 
lOD request. If there was no REEL card after the 
tape lOD, the request is then considered to be for a 
scratch tape. In this case, the first reel entry in 
the I-O request table will be zero. 

All three of the I-O assignment tables are used in 
a circular fashion. 

The I-O assignment procedure is as follows: 

1. Tape requests will be assigned in advance. The 
remaining types of requests will be assigned just 
before the PP is run. 

2 . Each PP will be checked to see if the requested 
lODs are valid. If not, the PP will be rejected. 



Working on one PP at a time, each individual I-O 
request is compared with each unit in the I-O con- 
figuration status tables to see whether or not the unit 
satisfies the request. If the request is satisfied as 
far as the type and channel grouping is concerned, 
further checks are made to see if the unit is available, 
unassigned, and not reserved. In the case of tape, 
a check is made to determine whether or not optimum 
reel mounting (the program tries to place a scratch 
tape on a unit that has a scratch tape already mounted) 
is to take place. If the unit is assigned or not avail- 
able, it will be ignored. If the unit is reserved, a 
test is made to see if the requesting PP is being 
entered in the bypass mode. If it is not, the unit 
will be ignored as this unit is reserved for a PP in 
queue ahead of this PP. If the mode is bypass and 
the I-O request is otherwise satisfied, then this 
request will override the previous assignment for 
that unit. 

The pre-assignment will be carried out, proc- 
essing one program at a time, either until there are 
no more units available for reservation or there are 
no more requests to process. After processing a 
program, a check is made to see whether or not the 
program is completely pre-assigned. If it is, the 
assigned bit is set to one in the PP reference table, 
signifying that all units have been pre-assigned so 
that continual scanning of the PP's I-O request table 
is not necessary upon entry to the assign routine. 
At the same time as the above check, there is another 
check to find out whether or not the mode is unover- 
lapped. If it is, then a quick exit is made from assign 
disregarding the remaining PP's that are in the queue. 

Before any exit is made, all tape mountings neces- 
sary will be printed for the operator via the commen- 
tator. The disposition field of the linkage will also 
be adjusted according to the status of the next PP to 
be run. If the status is reject, the pointer (TPPRUN) 
will be advanced to the next PP. This pointer is used 
by the move routine and should always be synchronized 
with the incoming problem programs via the input 
program. 

All the information necessary for assignment is 
stored away in the I-O assignment tables. This infor- 
mation is later transformed and merged with the lOD 
card to form the Actuator tables. This transformation 
is carried on by the move routine. 

The Move Routine: The move routine obtains and 
merges lOD or REEL cards with information generated 
by the assign routine to form the four actuator tables: 
symbolic I-O location table, file area tables, unit 
area tables, and the reel pool table. Certain system 
parameters will also be set up by the move routine: 
the maximum reference number used by the problem 
program, the next available full word following the 
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reel pool table, and the arc address of the next avail- 
able arc that is unused by the problem program. The 
move routine is entered with the linkage: 

LVI, $15, Z 
B, TMOVE 
Z XW, A, B, C, D 
(return) 

where: 

A is the first word address of the lOD or 
REEL card breakout: 
+ for normal entry 
- for initial entry 
B is the return disposition: 

Bits 28-30 indicate lOD errors: 

- none 

1 - in disposition field 

2 - in density field 
4 - in mode field 

Bits ''4-4 Y indicate other errors, if any: 

- none 

1 - '.llegal disk request 

2 - out of phase 

4 - exceeding reel pool table 
8 - zero I-O reference number 
C is job control reject indicator: 

- means accept next PP 

1 - means reject next PP 



D is mode and owner indicator: 
Bit 25 is mode indicator: 

- means overlapped 

1 - means unoverlapped 
Bit 26 is ownership bit: 

- PP owns lOD 

1 - MCP owns lOD 

The move routine (TMOVE, Figure 36) is used by 
JC4. The initial entry for each new problem program 
is noted to the move routine by a negative index found 
in the linkage. This initial entry allows the move 
routine to initialize itself for the next problem pro- 
gram, by resetting certain move parameters, com- 
puting the size and resetting the memory area used 
by the actuator tables, and checking the validity of 
the problem program about to be run. After the 
initial entry procedure has been performed, control 
is sent to the beginning of the move routine (TMl) as 
in the normal entry. 

At TMl , the routine checks for the type of card. 
If lOD, the card will be decoded into a format more 
usable by the remaining routine. A check will then 
be made to see whether or not the request for this 
unit via another lOD card has been submitted prior 
to this lOD card. If it has not, a new Unit Area Table 
will be constructed and the channel unit status table 
slot for the unit assigned to this request will be modi- 
fied. The information about the absolute assignment 
will be taken from the I-O request table. If the unit 
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has been requested by another lOD card prior to this 
lOD card, the construction of the unit area table aqd 
the modification of the channel unit status table will 
be bypassed. All lOD cards will cause the move 
routine to construct a file area table. If the lOD 
submitted is for tape, a slot wUl automatically be 
reserved within the reel pool table whether or not a 
REEL card follows. 

When a REEL card Is submitted to the move routine 
control is then passed to the section that constructs 
the reel pool table (TM6). This section looks back at 
the last lOD card submitted and finds the unit area 
table constructed for that lOD card. It then takes the 
address of the reserved slot within the reel pool table 
and looks to see if this slot is available for a reel 
name entry. If it is, the reel pool table will continue 
to be constructed until the reel names are exhausted 
from the REEL card. If it is not, the move routine 
scans the reel pool table until it can find a vacant 
slot for the reel name. 

If a disk lOD card is submitted and the type is 
DISK, the next available arc wUl be assigned to it. 
If type is TRACK, the next available arc address 
will be rounded forward to the next track address, 
th.en this lOD request will be assigned to that address. 
Hence, for optimum disk assignment or allocation, 
a PP should submit all disk requestir^ lOD's in a 
grouped fashion, all lOD's within the lype field of 



DISK together, then all lOD's with the type field of 
TRACK. 

After performing the above functions for each 
IOD/REEL card submitted, control is returned to 
job' control via the TN2 return. 

In the case of a reject entry to Move from job con- 
trol there will be no checks made for proper phasing. 
The next PP appearing in queue to be run will be 
rejected by clearing out the I-O request table entries 
and reel pool table entries. Then all the non-scratch 
tapes assigned for this PP that were previously 
mounted by the operator must be removed from the 
respective tape drives. The tape unloading procedure 
is carried out by using the $FREE service routine. 
The reject routine tests the entry mode. If the mode 
is bypass, the rejection must be made in the not- 
overlapped PP reference (TPURFT), I-O request 
(TUIORQ) and reel pool (TUFRE) tables. If the entry 
mode is overlapped, then the rejection is made in the 
overlapped tables for this particular PP. In the over- 
lapped mode the TPPRUN and TSAV index words are 
stepped to point to the next PP to be run. After the 
rejection is complete the exit from move is from 
normal exit TN2 with no error flag. 

The TN2 return sets up SMARK (SYN, TMARK) with 
the last memory cell used by move in setting up the 
actuator tables. The preset error flag index is then 
stored in the return linkage to job control, the index 
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■ The Move Routine 



registers restored, and control returned to job control. 

THE ACTUATOR TABLES ALLOCATION 
ALGORITHM: 

Let B equal the B limit (higher) from the LIM card. 
Let S equal the first word of the Symbolic I- O Loca- 
tion Table. 
Let R equal the largest Reference Number per prob- 
lem program. 
Let F equal the first location of the File Area Table. 
Let I equal the total number of lOD cards for prob- 
lem program. 
Let U equal the first location of the Unit Area Table. 
Let R' equal the total number of unique units 

requested by problem program. 
Let P equal the first address of the Reel Pool 

Table. 
Let N equal the number of individual REEL requests, 
plus one for every lOD card with the type of 
TAPE that was submitted without a REEL card. 
Let TMARK equal the next slot available after the 
Reel Pool Table, 
then: S = MAX (B, SOOOOg) 

S + R= F 
F + (I * 7) = U 
U + (R' * 9) = P 
P + N = Contents of TMARK 

The Unas sign Routine: The unassign routine (Figure 
37) makes the I-O units used by the previous problem 
program available again for assignment, unloads and 
rewinds the tapes used and tells the operator what to 
do with the unloaded reels. This routine is used only 
by JC4, and is entered by the following calling 
sequence: 

LVI, 15, (return address) 

B, TJUNAS 
It saves and restores the used index registers. 
Two subroutines are entered: SFREE (an actuator 
op) and the reel history routine (JHISTE). SFREE 
effects the unassignment of tape units, and JHISTE 
prints via the output program a record of the tape 
reels used by the problem program. 

After saving index registers, unassign initializes 
the reel history routine and tests TMAXRF, or 
SMAXRN, to see if the previous job had any lOD 
cards. Starting at TJNEXT, the program loops 
through successive entries in the PP symbolic I-O 
location table. Unassignment proceeds on a unit 
basis. As a unit is checked out, the SUUNAS bit 
is set to one in the unit area table, preventing re- 
peated unassignment of a unit with several lOD 
cards attached to it. For tape units, the reel history 
routine is entered. The mount bits are then set to 
zero (to guarantee entry to the actuator) and the 



SFREE routine used to unassign the unit. For non- 
tape units, unassign first waits for the unit to be- 
come not busy, after which the unit is released. Any 
repeated EKJ's result in a type 76 error exit to 
SDISP. For both kinds of units, the appropriate 
channel and unit status table bits are reset at the 
end of the loop (at TJTAP and TJNTPS) , in the dis- 
abled modes. After all units are unassigned, any 
stacked PP interrupts are discarded from SQUE, 
and the SAS and SSIO bits in the program status 
table are cleared. 

Aside from the index saving area, unassign uses 
only one word of working storage, TJCW, to copy 
control word into. It always returns to the address 
in. $15. 

JC4 Print Program 

This program prints out JC4 and $RESLD error 
diagnostics on the system output tape, and allows 
each installation to modify the routine easily so 
that these messages may be put out via the commen- 
tator. The unmodified routine (YPR) uses no index 
registers, and employs the short message routine 
(ZSPLPR) to effect the printout. All messages must 
be 8 words long and in A8 code. 

The modified routine uses $2 and does not restore 
it, uses SA8IQS to convert the message, and $COMM 
to print the message online. 

The routine may be modified by putting in a NOP 
at location YPR with any of three effective addresses: 

1. NOP, 0.0 produces messages on-line only 

in the BYPASS mode. 

2. NOP, 1.0 produces messages on-line in 

both the BYPASS and ONLINE 
modes. 

3. NOP, 2.0 produces messages on-line for 

all modes (BYPASS, ONLINE, 
OFFLINE). 
Major Package Fetcher 

This routine calls in segments of MCP from the disk 
as required, and keeps track of the current segment 
in core. It is entered at YMPFCH, and on the basis 
of the content of $1 and the current value of YMPSAV, 
decides whether or not a fetch is necessary. If not, 
it returns immediately at YFHBR. If necessary, the 
fetch is made via $ FETCH, and the fetch parameter 
XNFOST, CBUFF, and CFOT are reset to indicate 
an empty fetch buffer. Return is then made to the 
fetched segment at FHBR. 

The Reel History Routine 

The reel history routine (HISTE) prints a list of all 
the reels used by a unit, the lOD name which last 
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Figure 37 - The Unassign Routine 



activated the unit, and it also prints the job name. 
It is used by the unassign routine at EOJ time, and 
is entered once for each physical tape unit assigned 
to the PP. The routine uses the short message 
routine to perform the output via $SPR. 

Conversion Routines 

Four subroutines are used to convert data from one 
format to another. They operate disabled and are 
as follows: 

SIQSA8 IQS to BCD 

SIQSA6 



SA6IQS 
SA8IQS 

SCA6 

SBRK8 



BCD to IQS 



Card image to BCD 



Field break down 



The IQS to BCD Conversion Routine: This routine 
is entered at SIQSA6 or SIQSA8 according to the BCD 
byte size required, with the following linkage: 

LVI, 15, $+1.0 

BD, SIQSAx 

VF, A 

CF, N 

VF, B 

Return 
where 

A - is the FWA of the IQS string, 

N - is the number of characters to be con- 
verted, 

B - is the FWA where the BCD is to be stored. 



The routine selects a 6 or 8 bit store instruction and 
performs the conversion by table lookup. The routine 
saves, uses, and restores index registers 13, 14, 
and 15. 

The BCD to IQS Conversion Routine: This routine is 
entered at SA6IQS or SA8IQS according to the byte 
size to be converted, with the following linkage: 

LVI, 15, $+1.0 

BD, SAxIQS 

VF, A 

CF, N 

VF, _B 

Return 
where 

A - is the address of the BCD string, 

N - is the number of characters, 

B - is the location where the IQS string is to 
be stored. 



The routine adjusts for the input byte size and per- 
forms the conversion by table lookup. It saves, uses, 
and restores index registers 13, 14, and 15. 

The Card Image to BCD Routine: This routine is 
entered at SCA6 or SCA8 according to the BCD byte 
size desired, with the -following linkage: 

LVI, 15, $+1.0 

BD, SCAx 

VF, FWA (I) 

CF, N 

VF, A 
where 

FWA(I) - is the location of the first column in 
the card image to be converted, 

N - is the number of columns to be con- 

verted, 

A - is the address at which the BCD string 

is to be stored. 
The routine performs the conversion by table lookup, 
inserting a right parenthesis if an illegal punch com- 
bination is detected. Index registers 1 through 6 are 
used and not restored. 

The Breakdown Routine: The function of the break- 
down routine is to place each field of a string of BCD 
characters into a separate word. A field is defined 
as bounded on the left by a comma or the beginning 
of the string and on the right by a comma or the end 
of the string. The routine is written so that it can be 
assembled to take six bit characters or eight bit 
characters, according to the parameters QKSIZ 
(character size) and QSKIP (number of bits to skip at 
the end of a field word). These parameters are 
presently set at 6 and . 16 respectively. A field is 
limited to eight characters. 

The routine is entered at SBRK8 with the linkage: 
LVI, 15, $+1.0 
BD, SBRK8 
VF, A 
CF, N 
VF, B 
VF, M 
Error return 
Normal return 
where 

A - is the starting location of the string, 

N - is the number of characters to be broken 

into fields, 
B - is the starting location where the fields 

are to be stored, 
M - is the number of fields found by the 
routine. 
The error return is used if a field is found containing 
more than eight non-blank characters. Blanks are 
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omitted in setting up a field, as are commas. The 
routine saves, uses, and restores index registers 1, 
2, and 3. 

The Short Message Routine 

The short message routine provides MCP with a 
common 17 word buffer for output via $SPR. It 
operates disabled, and is entered with the linkage: 

SIC, ZSPLP9 

BD, ZSPLPR 

, FWA(I) 

, N. 

Return 
where 

FWA(I) - is the starting location of the message 
intended for $SPR, and 

N - is the number of words. 

The short message routine moves the message to 
its buffer and uses $SPR via the disabled entry to the 
IF analyzer. The routine saves, uses, and restores 
index registers and 1. Note that control is not 
returned when the short message routine is used by 
a program which is not a major package. $SPR will 
appear to the return routine to have been primed, 
and primed routines do not return to the requestor. 
(See dispatcher error control.) 



Resume Load 



The resume load major package controls the loading 
of binary decks prior to execution of programs under 
MCP. Its main function is to supply cards to the MCP 
loader, which it uses as a subroutine, and respond to 
exceptional returns from it. It also serves as the last 
phase of the Fortran BSS Loader. It is primed by 
phase 4 of job control, and may also be used by the PP. 



The Resume Load Package 

Resume load has one entry point, YRESLD (Figure 
38). Two pseudo-ops are associated with this entry 
point, $RESLD and 74. 32. The latter pseudo-op 
forces resume load to use $SCR as a source of cards. 
Otherwise, a program uses the SCORG bit, KSILO 
(see JC4) and SREADS to determine the source of 
cards and the manner of loading. Other preset regi- 
sters hold limits for the loader (YLLSAV) , and the 
disk type-area, if any (HDFCS). Resume load runs 
enabled, in the RIO mode, and saves no index regi- 
sters. 

Exit is always made via $RET. If the current deck 
was successfully loaded, its return or branch address 
is placed both into SICBU and location 1. 32 of the 



tentacle table (see $RET). If an error was encoun- 
tered during loading, $EOJ or $ABEOJ is primed so 
that the program is not executed. 

Resume load uses the following routines: 

1 . The JC4 print program - YPR - to print out 
diagnosing messages for loading errors. 

2. The major package fetcher - YMPFCH - to call 
itself into memory (if necessary). 

3. The MCP Loader - ALOADR - to load cards 

4. The Input program - $SCR - to get cards from 
the system input source. 

5. The Disk fetch - $ FETCH - to get card images 
from the disk. 

6. The Prime and return - SPRIME, $RET - as 
noted above. 

Resume load immediately enters YMPFCH to get 
itself into memory from disk. 

Its first task is to determine whether it is to act 
as a postprocessor to the BSS loader as is the case 
if KSILOf2.0 says BSSbbbbb in BCD, and if the 
current job is in the GO phase (SCORG=0) of a 
COMPILGO (KSILOfl. 19=1) . If it is a BSS post- 
processor, resume load obtains the loader limits 
from KSILO and sets them up to extend from the 
lower limit to the base address of blank common, to 
inhibit loading into blank common. It then exits to 
ARNRM5 in the loader, in such a way as to persuade 
the loader that it should load the next (i. e. , the first) 
Fortran subprogram. 

If resume load is not a BSS postprocessor, it sets 
up loader limits from YLLSAV, the fetch type-area 
from YDFCS, and $13 with the read source. At this 
point the op code is checked for 74. 32, or uncondi- 
tional $SCR. If this is the initial entry for the 
current deck (YLLSAV. 25=1) PP memory is cleared 
from location 41. /g) to SBAPP, or the base address 
of the PP I-O location table. The 1st card is already 
in YBCBU, if this is a GO phase, otherwise, it must 
be read from the source indicated by $13. 

At this point we have completed all of the initiali- 
zation in resume load. The routine basically consists 
of a loop between YRLCR and YLBRA. 32: get a card, 
load a card, etc. . If the loader gives branch return, 
the loop is broken, and return is made to the PP 
provided no input program UK has occurred 
(REJJOB. 60=0) . 

The remaining code exists to handle exceptional 
returns; $SCR end return, $FETCH end or error 
return, and loader error return. All are errors and 
cause a diagnostic message to be printed via YPR, 
with the exception of end return from $FETCH for a 
BSS job, which is handled specially. After printing 
the message, resume load primes $ABEOJ or $EOJ, 
depending on the initial entry bit. YEOJS and SPINCL 
(see JC4) are set to indicate the job has been com- 
pleted. 
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Figure 38 - The Resume Load Package 



Tables and Flags Used by Resume Load: Below is a 
list of the various tables and flags used by resume 
load and their definitions. The first four items are 
all preset by phase 4 of job control, prior to priming 
$RESLD. 

BREADS - the read source control is an XW whose 
flag bit is zero if the source is $SCR. If the flag is 
one, the source is disk and the value field contains 
the relative FWA in the disk type-area. Further, the 
count field, for compiled PP, contains the number of 
cards left on the current arc of disk. This XW is 
loaded into $13 by resume load. When the afore- 
mentioned count reaches zero, the value field is 
stepped 2 words and the count is reset to 34, the 
number of cards on one arc of disk. 

YLLSAV - contains loader limits, i.e. , those 
limits outside which the loader must not load. In 
addition, it contains the initial entry bit (. 25) , the 
T-card indicator (YTBIT, see JC4), and bit .57. 
This word is transmitted directly into the loader 
calling sequence by resume load. 

YDFCS - contains the A6 type-area name to be 
loaded from, if disk is the source for cards. 

SCORG - a bit in SCOMRG, which equals 1 when 

the current deck is a compiler and when it is a go 

nhase. 

REJJOB - Bit 60 of this word is set by the input 

program when an uncorrectable unit check occurs 

during the reading of a job. 

YBCBU - This 15-word buffer is used by both JC4 

and resume load to read cards into. 

KSILO - The processor communication region. 

The Fortran BSS loader and resume load define words 

8.0-10.0 of this region jointly (see description of 

Processor Communication Region). 

lower limit of PP 8.0 (BU, 18) 

upper limit of PP 8. 32 (BU, 18) 

base address of blank 

common 9.0 (BU, 18) 

address of relocation 

tables 9.32 (BU, 18) 

branch address 10.0 (BU, 19) 

ARCDCT - loader card counter for BSS jobs. It 

is set to 1 by resume load upon end return from 

$FETCH. 
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LVI, $15, $+1.0 
B, ALOADR 
, FWA 
, L 
, U 

(Error return) 
VF, D 

(Branch return) 
VF, A 

(Normal return) 
where 

FWA is the first word (18-bit) address of the card 

to be loaded. 
L is the lower limit of the PP. If XF=1, this is a 

new job and the loader must initialize. 
U is the upper limit (protected) of the PP. If 

XF=1, the sequence counter is reset to contain 

the information in column 3 of the first binary 

card encountered. 
Error return is a half-word location to which the 

loader returns when it cannot correctly load the 

card. 
Half-word error code, D contains the sequence 

number, in bits 0-11, of the binary card in error 

or zero for an octal card. Bits 13-17 contain 

the following error codes: 

1 — Checksum error 

2 — Sequence or ID error 

3 — Illegal card type 

4 — Illegal non-BSS function 

5 — Out of bounds 

6 — C or P card incorrectly punched, e.g. , 

hex character is not a 0-9 or A-F. 

7 — Blank location in first octal card. 

8 — First binary card not an origin card. 
Branch return is a half-word location to which the 

loader returns when it encounters a branch card, 
or when the card count equals zero and there are 
no more relocation tables in a BSS job. 
Half-word branch address is given unless the 
branch address field of the branch card is zero. 
In that case, A is the origin of the first origin 
card, or in a BSS job the branch address is 
taken from the communication region. 
The loader does not save or restore index regis- 
ters. A blank checksum means that the checksum 
is not to be used. The sequence number on reloca- 
table cards is not checked. 



The MCP loader, ALOADR, is a binary, correction, 
dump, and patch card loader. It is used as a sub- 
routine of the Resume Load pseudo-op, $RESLD. 

$RESLD fetches the cards to be loaded and enters 
ALOADR, one card at a time, by the following link- 
age: 



BSS Jobs: For BSS jobs the MCP loader uses the 
communication region, KSILO, which has been set up 
by BSS. KSILOf2. contains the A 6 name "BSSbbbbb" 
which is used by the loader to decide if the current 
job is a BSS job. PCSILO^O. 32 contains the address of 
the relocation tables which are used by the loader to 
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load BSS jobs. KSILO+10.0 contains the branch 
address which will be inserted in the resume load 
loader calling sequence when loading is finished. 

The format of the relocation tables is shown in 
Figure 39. 

The loader (ALOADK, Figure 40) checks bit number 
25 of the lower limit. If this bit is 1, ALOADR turns 
it off, initializes its counters, and sets up its internal 
boundary limits for the new job. A check is made on 
bit 25 of the upper limit to see if a T card has been 
saved for this job. If one has, ATCRDI is turned on 
and the sequence number of the first binary card is 
used as the base sequence number. Column 1 is 
tested to determine the card type, and control is 
transferred to the appropriate routine. These 
routines return to ANORMR to make a normal return, 
or to AERR3 to set up an appropriate error message 
and make an error return. A branch return is made 
when the validity of the branch is verified. 

Loader Card Classes: The loader handles 15 classes 
of cards, identified by the punches in column 1: 

Absolute origin (7, 8, 9) 

Absolute flow (7, 9) 

Absolute branch (6, 7, 9) 

Relocatable data (6, 7, 8, 9) 

Relocatable instruction (5, 7, 9) 

Fortran branch (5, 6, 7, 8, 9) 

Fortran program (5, 6, 7, 9) 

Common definition (5, 7, 8, 9) 

Correction (12, 3) 

Patch (11, 7) 

Dump (12, 4) 

T (0, 3) 

Super T (0, 2, 3) 

Loader adjustment (O) (11, 6) 

B (12, 2) 

B, T, and Super T Cards: These cards are not 
loaded. For T and super T cards, indicator ATCRDI 
or ASTRCRD is turned on. These indicators are 
later tested by the sequence test routine ASEQ. 

Loader Adjustment Card: Loader adjustment cards 
(O in column 1) are handled by ALDADJ. This 
routine picks up the 8 Hollerith characters in 
columns 2-9, converts them to octal, and checks to 
see if they set an origin which is within the program's 
bounds. If the origin is within bounds, the loader's 
origin counter ALDCTR is set to the value on the O 
card. The branch address is also set to this value 
if a previous quantity has not been saved. These 
cards are ignored for BSS jobs. 

Absolute Branch Card: The branch address on the 
card is checked to see if it is within bounds. If so. 



it is inserted into the calling sequence. If it is not, 
an error return is made to the calling sequence. If 
there is no branch address, a check is made to see if 
an initial origin has been saved, which will then 
become the branch address. If no origin has been 
saved, an error return is made. This routine gives 
control to the branch return in the loader calling 
sequence. 

Common Definition Card. Fortran Branch Card, and 
Fortran Program Card: These card types use the 
routine AFPCRD (Figure 41). A check is made on 
AFPCI to determine whether or not a Fortran pro- 
gram card had previously been handled. If so, the 
card is counted in the routine ARNRMl. If the card 
count for this BSS job is not zero, normal return is 
made to the loader's calling sequence. If the card 
count equals zero, a test is made on the count field 
of the second word of the current relocation table to 
determine how many transfer vectors are to be trans- 
mitted to problem program storage. If SRNXAD is 
zero, the branch address is picked up from KSILO 
and stored in the branch address slot of the calling 
sequence and branch return is made. If SRNXAD is 
not zero, $RESLD is set up to fetch the next sub- 
program and normal return is made. 

If no Fortran program card has been received, a 
test is made to see if this is a BSS job. If not, error 
return is made. If this is a BSS job, AFPCI is set 
to one and the address of the first relocation table is 
picked up from KSILO. This table gives the origin 
to the loader and enables it to compute the width of 
the set of relocation bits for each half word. This 
width is 1, 4, or 4+i where lis the field size neces- 
sary to express the highest-numbered labeled com- 
mon block. For non-BSS jobs, the width of the set is 
either 1 or 4. If the current subprogram is not a 
library routine, the card count is stored in ARCDCT. 
Control is passed to the card count routine and 
eventually normal return is given. 

Absolute Origin, Absolute Flow, and Relocatable 
Binary Data Cards: These card types eventually are 
treated as one, and use AORGl to load the informa- 
tion from the card. 

The absolute flow card routine (AFLOW, Figure 
41) checks to see if an origin has been saved. If not, 
error return is given. The next location table loaded 
into is picked up from ALDCTR and put in $1 for 
AORGl. $6 is set up for the boundary test made in 
AORGl and set-up is done so that a partial word will 
be loaded. Control is then passed to the absolute 
origin card routine at the boundary test instructions. 

The relocatable binary data routine, ARBDCD, 
picks up a 19-bit loading base from column 10 and 
tests to see if it is program data or common data. 
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if SRLIB bit = 1, meaning a library subprogram 
is to be loaded, then this is a 36-bit field 
containing a type-area name for a library 
subprogram. 

If SRLIB bit = 0, meaning TWS is to be loaded, 
then this is an 18-bit relative FWA in TWS. 

Count of cards in subprogram when SRLIB = 0. 

Origin of subprogram. 

Length of transfer vector. 

Address of next relocation table. This equals 
zero when there are no more tables. 

Number of named COMMONS. 

Base of named COMMON. 



Figure 39. Table Organization 
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If it is data to be loaded into named common and this 
is a non-BSS job, error return is made. If it is 
named common data, the common origin is picked up 
from the relocation table for this subprogram. 
Otherwise, the current location is picked up from 
ALDCTR. The relative origin is added to it and the 
total is stored in $1 as an absolute origin for AORGl . 
The origin saved indicator, ALL. 3, is set to one, 
ATCRDI is set so that no sequence check is made, 
and ARBCDI is set so that the appropriate return will 
be made from the absolute origin card routine. Con- 
trol is passed to the absolute origin routine at the 
origin checking point, ALD8. 

The absolute origin card routine sets up the origin 
punched in columns 6 and 7 in $1 and tests for an out 
of bounds origin, in which ease error return is made. 
The number of full words and the size of a partial 
word to load are set up. A test is made to see if the 
card will be loaded within bounds. If not, error 
return is made. If a partial word is to be loaded, the 
number of bits involved is set up in the field length 
and address fields of instruction. ALDl and the suc- 
ceeding instruction and the partial word indicator, 
AHFWDI, are set to 1. The sequence number and 
checksum are tested. The appropriate skipping or 
zeroing is done and the contents of the card are 
loaded one 64-bit word at a time. The partial word, 
if any, is loaded next, and any skipping or zeroing is 
taken care of. If this was a relocatable binary data 
card, control is passed to ARNORM which adjusts 
the appropriate counters and counts this card. Other- 
wise the current instruction counter is stored in 
ALDCTR, AHIWD is rounded up to a 19-bit address, 
if necessary, and normal return is made. 

Relocatable Instruction Cards: These cards are proc- 
essed by the routine ARBNCD (Figure 41). The 
checksum is computed and checked. The absolute 
origin is computed by adding the relative origin in 
columns 6 and 7 to the program origin. The upper 
address to be occupied by this card is computed by 
adding the number of bits to be loaded to the absolute 
origin of this card; the result is then checked to see 
if it is within bounds. The number of half words to 
be loaded is stored in the count field of $4; the number 
of bits left is stored in the field length of ARBCD7 
and ARBCD6 and in the address field of ARBCD6. 
The location of the relocation bits is computed. A 
half word instruction is picked up and its associated 
relocation bits are tested to determine what type of 
relocation, if any, is to be done. The relocation bits 
are defined as follows: 

- No relocation (one bit used) . 

1000 -Relocate leftmost 18 bits as lower address. 



1010 - Relocate rightmost 18 bits as lower address. 

lOOlC -Relocate leftmost 18 bits as common C. 

lOllC - Relocate rightmost 18 bits as common C. 
where C is a binary integer, encoded in i bits, indi- 
cating the number of the common. For blank common 
references, C=0. If a reference to a named common 
is made and this is a non-BSS job, error return is 
given. 

The card is loaded one half word at a time and any 
remaining bits are relocated and loaded. The loader's 
counters, AHIWD and ALDCTR, are updated. If this 
is a BSS job, the card counting routine is entered. 
Otherwise, normal return is made. 

Octal Cards (C, P, and D): These cards are all 
processed by the routine AOCTLA (Figure 42). The 
decimal point column is put in the accumulator. If 
the entire contents of the card were to be ignored 
(i. e. , AOIGNI=l), the location counter is stepped up 
by a half word and no loading is done. If this is a P 
or D card, the decimal point check is skipped. If 
the decimal point column does not contain 12, 3, 8 or 
1,3, 8 punches, a check is made to see if this is the 
beginning of a continuation card with a blank location 
field. If so, the contents of ALDTC are used as the 
origin for this card and the loading process continues 
with the first half word on the card. If not, then the 
contents of the card have been loaded and the loader's 
counters, AHIWD and ALDTC, are updated and normal 
return is given. 

After checking the decimal field, the 7 Hollerith 
characters of the location field are converted to octal 
and checked to see if it is within bounds. E not, error 
return is made. The rest of the card is scanned as 
follows: (1) the location to be loaded into is checked 
to be sure it is within bounds, (2) the decimal point 
column is checked, (3) an octal-hex half word is con- 
verted, (4) the half word is loaded into core storage. 
This continues until a maximum of 4 half words per 
card have been loaded. 

The P card routine, APCARD, also picks up the 
full or half word instruction at the location of the 
patch and moves it to the location specified by AHIWD 
before it loads the corrections. It inserts a branch 
to the patch area (and a NOP if the instruction being 
replaced is a full word instruction). After the con- 
tents of the patch are loaded, ANORMR returns con- 
trol to APCRDND where a branch to the PP is stored 
in the patch area and AHIWD and ALDTC are updated. 

For D cards, ADCARD performs the function of 
APCARD and uses APCARD to replace the instruc- 
tions with a branch or branch, NOP and uses AOCTAL 
to load the dump parameters. In addition, it inserts 
the dump calling sequence in the patch area. 
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Figure 42 - The MCP Loader - Chart 3 



Accounting Program Procedures (Logger) 

The accounting program to be used must be supplied 
by the installation, and wUl occupy storage in excess 
of that allocated directly to MCP. Since MCP wUl 
have reference to the accounting program, and vice 
versa, appropriate addresses must be available upon 
compilation of both systems, or correction cards may 
be used when an MCP update is done. 

In this section, the calling sequences for the account- 
ing program entries will be given, as well as an 
explanation of the kinds of information that are avail- 
able at the specific times used. The accounting pro- 
gram must have an initial state, since the system will 
start in the IPL phase. The job control sequence of 
events is critical, and will affect how the accounting 
program receives control. 

B, D MCP 
, S LOG 1 
, Hollerith card FWA(I) 

return 

The entry through an S LOG 1 will provide a Hollerith 
card image address. The card will be either a JOB 
card or a COMD, EOF card. One of the initial set- 
tings of the accounting program may be to make use 
of the S LOG 1 JOB card entry to determine the time 
spent in the unoverlapped scanning of the original sys- 
tem input tape when the system is starting up in the 
overlapped mode. This procedure may be terminated 
when the first job is started by entry in S LOG 4 
(described later), which will communicate to S LOG 1 
the fact that overlapping is now in effect. The COMD, 
EOF card will be transmitted by the command pack- 
age upon receipt of an EOF command card. This 
transmission will take place only if the EOF card is 
the last card in the card reader when in the online 
mode of operation, or the EOF card is the last file 
on a scan tape if in the off-line mode. This EOF will 
signify that the system is no longer overlapping the 
scanning and running of jobs, since it will come 
through job control 1 and S LOG 1. 

B, D MCP 
, S LOG 2 

return 



SIC, Z COM 90 
B, Z ASN 01 

VF, lOD NUMBER 

return 
The S LOG 2 function might be to calculate the time 
for the job, and then punch this information into a 
card along with the job name and other data, such as 
number of units used, etc. . It cannot be assumed 
that any of PP storage or associated lOD tables will 
contain valid information at this time. 

B, D MCP 
, S LOG 4 

, Hollerith card FWA(I) 
, A8 FWA(J) 

return 
The S LOG 4 entry to the accounting program is used 
by the job control 4 at the beginning of a job or by 
commands to indicate an EOF condition arising when 
an EOF card appears as the last file on a system read 
tape or in the card reader as the last card in the 
BYPASS mode. The Hollerith and A8 FWA's make 
the contents of the card available if the accounting 
program wants to note the job name or determine 
whether the system is now idle. 

It is the responsibility of S LOG 4 to disasslgn the 
punch or printer at this time. When the system is 
initially started, the initializing program will have 
assigned the unit to the accounter. Since S LOG 2 is 
not entered before the first job is started, the dis- 
assignment must be done by S LOG 4 when job control 
4 gives it control just before the first or new job is 
started. The S LOG 4 entry is made before assign- 
ments are made to the PP so that the unit will be free 
when assignments are made. The calling sequence 
for the special disassignment package is: 

SIC, Z COM 90 

B, Z DSN 01 : 

VF, lOD NUMBER 

return 
The accounting program may also wish to make use 
of the $TIME pseudo-operation afforded by the sys- 
tem. 

INITL^lL PROGRAM LOAD (IPL) 



The S LOG 2 entry Indicates that a job is completed. 
No addresses are provided since the accounting pro- 
gram should have a record, from the last S LOG 4 
entry, of the job name of the job just completed. 
There exists, for convenience of accounting purposes, 
a special program to assign a card punch or printer 
unit to the accounting program for use between jobs. 
The lOD tables will be set up at IPL time by having 
inserted an appropriate lOD card in the IPL tape for 
the desired unit. The calling sequence to the special 
assignment routine is: 



Initial Program Load (IPL) is used to read MCP into 
storage at the beginning of a work period or after an 
emergency shut-down. IPL is in two parts: the IPL 
bootstrap and the initialization program. It performs 
the following functions: 

1. Fulfills the requirements of a power-on initial 
program loading (IPL). 

2. Constructs I-O status tables according to the 
configuration at IPL time. 

3. Assigns absolute I-O units to symbolic MCP 
requests. 
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4. Mounts MCP tapes. 

5. Loads MCP into core. 

6. Writes PROSA on the disk. 

7. Starts job control. 

The Master IPL Tape 

The master IPL tape is prepared by the master update 
program (UPDATE-30). The tape consists of two 
files: (1) a record containing the IPL bootstrap mem- 
ory usage, (2) a series of 513-word records in one- 
to-one correspondence with arcs of PROSA (perman- 
ent read only storage area) on the disk. The order of 
the first four type areas in this file is always the 
same: 

Type Area Content 



IIAIIDIC 
IIBIIIND 
IICIIIPL 
IIDIIMCP 



PROSA dictionary 

PROSA index 

IPL initialization program 

MCP 



The first word on the tape is a control word to 
read in the rest of the IPL bootstrap record. The 
tape unit on which this tape is mounted must be on a 
unit dialed to zero. 

The IPL Bootstrap 

The IPL bootstrap (XIPLBS, Figure 43) performs the 
machine initialization necessary at IPL time, locates 
the channel with the master tape, and prepares it for 
subsequent reading. The bootstrap consists of the 
code from XIPLBS to XBSEND. The bootstrap reads 
as many records from the master tape as core stor- 
age permits, and then (X9A4) moves the initialization 
program (the third type area) to its operating storage. 
Control is given to the initialization program at XIO 
to move MCP (the fourth tj^pe area) to its operating 
storage. The disk is located to arc zero, and the 
input buffer written on the disk. A loop is set up 
between the read portion of the bootstrap (X9A) and 
the initialization program (Xll) to read tape and write 
PROSA until the tape is exhausted. The IPL tape is 
then unloaded, and initialization begins in earnest (X13). 

The Initialization Program 

The initialization process is controlled by certain 
control cards, which define the I-O configuration, 
MCP's I-O requirements, and furnish necessary 
parameters. 

Control Cards 

Symbolic cards are used to simplify any changes 
which have to be made. These cards describe stand- 



ard conditions which can be modified through the use 
of console switches at initializing time. The control 
cards are included with the initializing program, and 
if they are to be changed, they must be updated on 
the master tape. Three types of control cards are 
used: 

1. I-O Configuration Definitions (lOCD) 

2. MCP lOD's (lOD) 

3. MCP Parameters (MCPP) 

I-O Configuration Definitions: The lOCD cards 
define the distribution of I-O units at initializing time. 
Each card describes a channel. Channels which are 
not so defined are assumed to have no attached units. 
The lOCD cards, which do not have to be in order of 
channel number, have the following fixed fields: 

Cols. 10-13 — Card Type: contains the char- 
acters, lOCD. 

Cols. 14-15 — Channel Number: contains the 
decimal number of the channel. 

Cols. 16-17 — Equipment: must contain one of 
the following codes: 

CN Console 

DK Disk 

PR Printer 

PU Punch 

TP Tape 

RD Reader 

MCP lOD's: The lOD cards define the I-O require- 
ments of MCP and perform the same function for 
MCP as they do for the problem program. The 
initializing program will assign these symbolic 
requests to absolute units. 

MCP Parameters: This card is used to provide MCP 

with initial parameters. It consists of fixed fields as 

follows: 

Cols. 10-13 — Card Type; contains the characters 

MCPP. 

Cols. 14-17 — Mode: defines the mode in which 

MCP will ordinarily start operating. It must be one 

of the following: 

OFFLINE - Off-line overlapped 
ONLINE - On-line overlapped 
BYPASS - Bypass (Unoverlapped) 

The I-O Status Table Set Up 

At X13 (Figure 44), the initialization program proc- 
esses the lOCD cards to form the Unit and Channel 
Status Tables (UST and CST) . The lOCD cards need 
not be arranged in channel-number order, but there 
must be one card for each channel physically in the 
system whether that channel is available or not. 
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Figure 43 - The IPL Bootstrap 
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Figure 44 - The Initialization Program - Chart 1 



The tables are first formed in lower storage and 
then relocated pC19, Figure 45) to the area just below 
MCP (toward lower registers). This relocation allows 
the table size to vary from IPL to IPL. The tables 
which are set up by the assignment phase of the 
initializing program are just below the I-O tables. 
The lower boundary of the MCP table area is com- 
puted and saved as a system parameter (S MCP) in 
the communication region. 

After processing the lOCD cards, the program types 
the date of the tape update (XDATE), and reads the 
console to determine if the operator desires any 
options. If binary key 29 is on, the program (XIO) 
performs the requested status change and reads the 
console again, repeating until a status change is no 
longer requested. 



MCP 1-0 Assignment 

The assignment of absolute units from lOD cards 
will be done for MCP at IPL time through a modified 
decode-assign-move routine (X20B, Figure 45). 

The assignments are made according to the I-O 
configuration as defined by the I-O tables, the type 
of IPL (normal or abnormal) , and the operating mode 
(on or off line overlapped or unoverlapped) . A sum- 
mary of the action taken by this decode-assign-move 
sequence is as follows: 

1. Normal IPL and Unoverlapped Mode: The card 
reader is assigned to MCP. A unit area table and 
file area table are set up for the card reader under 
MCP ownership. The output tape units are assigned 
to MCP and the necessary tables are constructed. 
Mounting messages are sent out to operator for 
scratch tapes to be placed on the assigned units. The 
unit and file area tables are formed for the input 
tapes, but they are not put under MCP ownership until 
a system command changes the operating status to 
overlapped. No mounting requests are made until the 
mode changes. 

2. Normal IPL and On- Line Overlapped Mode: 
The input tape units are assigned to MCP and the 
necessary tables are setup. Mounting messages are 
printed out for tapes to be mounted on two units. 
These tapes will initially contain no jobs, but will be 
filled with problem programs read in from the card 
reader. Card reader and output tapes are assigned 
as they were in case 1. 

3. Normal IPL and Off- Line Overlapped Mode: 
The input tape units are assigned as in cases 1 and 2. 
However, the mounting messages will be worded 
differently since the scan tape which contains the first 
job to be run must be mounted on the symbolic unit 
which will be first referenced by the input program. 
The other scan tape will be placed on the second input 



unit. Output tapes are assigned in the same manner 
as the two prior cases. The input card reader unit 
area and file area tables are formed but not put under 
MCP ownership until a system command changes the 
operating status to unoverlapped, on-line overlapped, 
or makes the unit the system input source. 

4. Abnormal IPL and Off- Line Overlapped Mode: 
The abnormal IPL selection is made at the console and 
must be used when restarting with an input spool read 
tape which has been partly exhausted of its jobs, such 
as after a system failure or after an end-of-day shut- 
down. While in the on-line or off-line overlapped 
mode, the IPL must be made in the off-line overlapped 
mode because the old read tape must be rescanned. 
The assignments and the mountings will be the same 
as case 3 except the second input tape will be an 
unused scan tape which will be used later as a write 
tape. A system command must be entered before 
tape switch time to return to the on-line overlapped 
mode, if such mode is desired. The output tapes 
and the card reader are handled as they were in case 
3. 

When I-O assignment is complete, the program 
(X261) stores the base address of the I-O location 
table and the address of the next available arc on 
the disk in the MCP communication region, and 
moves the UAT and FAT to their proper locations. 

Transfer to MCP 

The program (XRE Jl , Figure 46) stores the number 
of jobs to be rejected if this is an abnormal IPL, and 
tests for a mode change request from the operator. 
If none, the mode is taken from the MCP parameter 
card. The necessary bookkeeping is performed, and 
(X37) the command package and JC4 are primed. 
The MCP boundary register and interrupt address 
are stored, and the IPL messages printed if the 
suppress key is not on. 

Final bookkeeping is done (X378) , the disk located 
to arc zero and all tape units selected, and $EET 
issued. The system starts when the return routine 
empties the prime queue. 

IPL Error Control 

Any error detected by the IPL initialization or boot- 
strap programs results in a BD, $, with an accom- 
panying error message typed if possible. The error 
control routine, ZERROR, will type an error message 
if it can identify the error and can access the console. 

THE COMMAND PACKAGE 

At any given time during the normal processing of 
jobs, the operator may want to alter the automatic 
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Figure 45 - The Initialization Program - Chart 2 
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flow of work through MCP. The System Command 
Program interprets and acts upon these requests. 

For some of these commands, the desired response 
may depend upon the operating mode of the system, 
e. g. , overlapped or bypass. In order to avoid a con- 
flict between intent and actual execution, the input 
source for some commands is restricted. The prefer 
source is determined by the system mode and the 
nature of the command. 

Command Mainstream 



Before control can be passed to one of the individual 
command routines, certain general checking proced- 
ures must be performed. The command mainstream 
(JCOMD, Figure 47), decodes all commands into a 
standard format and breaks them into individual 
fields. It develops a matrix mask from the source 
and the operating mode of the system to test the 
legality of the command request. The mask is also 
used for internal control procedures within the 
routines. A normal exit routine is provided by the 
mainstream for all specific routines, and two error 
exits: ZEREXl, for use when the command is illegal; 
and ZEREX2, for use when a legal command is given 
in an illegal situation. 

Sources 

There are four possible entrance sources to the Sys- 
tem Command Program. All use the calling linkage 
described under SCOMD pseudo-op. The most fre- 
quently used sources will be the operator's console, 
known as the operator source, and the input program 
card reader source. In this case, the linkage will be 
an indirect transmitting linkage between the operator 
and the command package. 

Console: The operator may wish to enter a command 
via the console typewriter, providing this is a legiti- 
mate source for the command in the mode in which 
the system is operating. 

When the CS is generated at the console, the inter- 
rupt is received and interpreted by the conceptor. 
The conceptor will issue a hardware read to the 
console; this releases the keyboard. The console 
reserved light will also be turned on. The conceptor 
then gives up control until the operator has finished 
entering his message and an EOP interrupt is gener- 
ated by the END key. The console read portion of the 
conceptor gains control and examines the message 
for a DB or PP as the first two characters. If 
neither is there, control is passed to the signal return 
exit in the command console table of exits, the first 
location of which is JCFIX. 



The signal return interrupt routine resets the 
SCNSSG indicators in the unit status tables, obtains 
a count of the number of characters in the message, 
primes system commands, and issues $RET. The 
eventual unstacking of the prime queue actuates the 
command. Since the console is reserved, the message 
may be left in the conceptor buffer PMCPBF with 
impunity. 

Job Control: Commands entered via the input source 
will be discarded by job control unless they occur 
between jobs: i. e. , after a job boundary and before 
the succeeding job card. 

When job control detects a command card in phase 
1 (JCl source), it enters the command package directly 
with the command pseudo-op, SCOMD. Control is 
returned to JCl when $RET is given by the com- 
mand package. 

When phase 4 of job control detects a command 
(JC4 source), it primes the command package (SCOMD), 
primes itself, and issues $RET. Thus, control will 
ultimately return to the beginning of JC4 after the 
command is activated. 



SCOMD Pseudo-Op 

The communication link between the separate sources 
and the command package depends mainly on the 
calling linkage; in the case of the operator, it depends 
on the interrupt mechanism and routines. The con- 
version routine and the prime mechanism are the 
primary system routines used. 

The passage of control to the Command Program 
uses the following linkage: 

B, $MCP (or SICSPRIMR; BD.SPRIME) 
, SCOMD 
, S. 
, L.(I) 
, N.(J) 

(Error return) 
(Normal return) 
in which: 

S is the source of the command: 
1.0 - Job Control 1 
2.0 - Job Control 4 
3.0 - Console 
4.0 - Initializing Program 
L. (I) is the bit address of the first IQS character 
(console) or of the broken-out field (Job Control) 
or of the BCD character string (Initializing Pro- 
gram) . 
N. (J) is the number of characters or fields. 
(Error return) may be used only when the reject 
command is given by JCl. 
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The format of the command message is essentially 
the same for all sources. Commands coming via 
cards must have a B punch in column 1 but the state- 
ment field, columns 10-72, contains the command 
statement as it is entered via the console: 

COMD, command and parameters 

Upon receipt of control, JCOMD (Figure 47) saves 
the index registers and then proceeds to construct 
the matrix mask from information in the calling 
sequence and the system mode bits, SYSMOD. Be- 
cause the command message may be any one of three 
different formats depending on the source, a multi- 
way branch must be made to specific calling sequence 
sets for conversion, breakout and/or moving routines. 
These sets of calling sequences will transform the 
message, if necessary, into BCD format, break it 
outj and eventually store it in an area JFLDB. The 
message in JFLDB is in eight-character broken-out 
fields. If the number of fields is less than two, the 
command request is in error, and the common error 
exit routine is entered with an explanatory message. 

If there are two or more fields and the command 
is entered through a source other than the Job Con- 
trol source, the first field will be tested for COMD 
at ZCMCRD. If rejected, exit will be made via the 
common error exit routine. After determining that 
a command message is acceptable, a table lookup is 
made to compare the second broken-out field, the 
command request cp code, with a table of legal op 
codes for the commands. If the command request is 
not found in the legal list, the common error exit is 
entered, with an appropriate message. For all error 
messages, a hard copy is made on the console if the 
input source was not console. If an equal comparison 
was found, a branch is made to" the requested indi- 
vidual command routine for further processing. 

The common error exit routine, JHARD, will make 
a hard copy of the command message on the console 
typewriter, if the console was not the source. The 
routine uses the SA6IQS conversion routine to convert 
the original command message to IQS code. This, 
together with an amplifying error message is then 
sent to the console tj^ewriter via the commentator. 
The normal exit routine, ZEXIT, is then used, which 
resets the console reserved light, if necessary, 
restores the index registers, and gives $RET. The 
general exit routine provides for handling normal 
exit messages as well as error exit messages by use 
of index registers. 

The major system subroutines used by the com- 
mand mainstream are the conversion routines from 
one format to another, and the breakout routine. The 
inputs can be in IQS, BCD broken out, or BCD. These 
must be transformed to broken out BCD fields. 

The reserved light off pseudo-op is the only pseudo- 
op used, and the commentator is used for output. The 



hard copy maker converts from BCD to IQS for the 
commentator, using the SA6IQS routine. 

Mode Control Commands 



The operating mode of the system (bypass, online, 
offline) may be altered by the operators at any time 
via the system command package. The mode control 
commands may be entered via any of the sources, 
and the IPL source serves as the initiator for the 
system input program. 

The BYPASS Command 

The BYPASS command (ZBYPASS, Figure 48) will be 
actuated in several different ways, depending upon 
the source. If the source is IPL, SYSMOD is set to 
BYPASS(IO), and the SPPBTl indicators are set to 
11. These indicators are tested by the overlapped 
mode change commands to determine whether tape 
lOD's have been previously assigned or not. The IPL 
sequence then leads to ZBAl. 

If the source was Job Control 1 and the present 
mode is overlapped, the STRANB indicator is set so 
that on $RET, Job Control 1 will stop requesting 
cards from System Input. A branch is then made to 
ZBAl. 

If the operator's console is the source and the 
present mode is offline overlapped a branch is made 
to ZBAl. ZBAl is an MCP calling sequence linkage 
to the input program, requesting a transition to the 
bypass mode. Upon return, the index linkage is set 
for the command acceptance message and exit is 
made to ZEXITX. 

If the source was Job Control 4 in the bypass mode 
and STRANB is 1, STRANB is set to and a branch 
made to JNOPX (Figure 48). This is done because 
the input program will give the BYPASS command 
card to JC4 as the first card of the first bypass job. 
Since this command has already been actuated, it 
must be ignored. K STRANB were =0, an error exit 
ZEREX2 branch would be made. If the source was 
JC4 in an overlapped mode, the BYPASS command 
was on an offline tape, and return to overlapped has 
been accomplished after entering bypass from phase 
1. JNOPX is entered. Any other source or mode is 
in error. 



The ONLINE Command 

The ONLINE command (ZONLIN, Figure 48), like 
BYPASS, is source-dependent for its actions. If the 
source is Job Control 4 in the bypass mode, a branch 
is made to ZONOIY where STRANB is turned off. 
This is necessary because STRANB might have been 
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Figure 48 - Mode Control Commands 
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set by a BYPASS command, appearing at the end of a 
scan tape, in the offline mode. STRANB would not be 
reset since the BYPASS command card in offline mode 
is not passed on to JC4 as the first card of the bypass 
job. Control then passes to ZONOlX. 

If the source is IPL, a branch is made to ZONOlX, 
where SYSMOD is set to online mode (00) , followed 
by a test of SPPBT2 to determine if tape lOD's have 
been assigned. If so, a branch is made to Z0FF02, 
a subroutine consisting of two calling linkages to the 
special assignment routine. Both branches go to 
ZONOOl. 

If the source is JCl or operator's source and the 
mode is offline, a direct branch is made to ZONOOl 
which is an MCP calling linkage requesting the input 
program to make a transition to the online mode. 
This is followed by setting up of the acceptance 
message and a branch to ZEXITX. 

If the source was JC4 overlapped, the NOP exit 
JNOPX is taken. Otherwise the command is in error 
and a branch is made to ZEREX2. 

The OFFLINE Command 

The OFFLINE command (ZOFFLN, Figure 48) is also 
source-dependent for its actions. If the source is 
JC4 in the bypass mode, a branch is made to ZOFFOD 
to turn off STRANB. This is the same situation as 
ZONOIY in the ONLINE command. SPPBTl is then 
tested for previously assigned system tapes, and if 
not assigned, control is given to ZOFF02. An indi- 
cator, SPPBT3, is also set for test later .to show that 
the tapes were assigned by this command. In either 
case, control eventually goes to ZOFFIX. If the 
source was IPL or JCl , online control is given 
directly to ZOFFIX. ZOFFIX is an MCP calling 
sequence to the input program requesting initiation of 
a transition to the offline mode of operation. There 
are two returns from the input program: one for nor- 
mal and an end return if the command card is not the 
last card in the card reader. 

If the normal return is reached, a test of mode is 
made; if online, the return address to JCl is altered 
to go to a $RET sequence to JCl. In either case mode 
is then tested for IPL. If not IPL, the card reader is 
disassigned via the special disassignment routine 
ZDSNOl. Both branches now lead to ZOFFIO which 
sets SYSMOD to OFFLINE(Ol), sets the present- 
command-assigned-tape indicators off (SPPBT3) and 
exits via ZEXITX. 

If the end return is given by the input program, a 
branch to ZOFF72 is made. If tapes were assigned 
earlier by this command, they are disassigned and 
the assigned tape indicators SPPBTl and SPPBT2 are 
reset to 1. Either branch leads to the error exit 
ZEREX2. 



Job Control Commands 

Four commands are available to operations personnel 
to control the flow of work through the system. They 
provide the following capabilities: 

1. Change the time clock ($TC) calibration con- 
stant (CLOCK). 

2. Cause the rejection of a job already on or par- 
tially on the scan tape (REJECT). 

3. Cause the termination of the job in progress, 
with or without an error dump (ABEOJ or EOJ). 



The CLOCK Command 

The CLOCK command may be entered via the console 
typewriter, or via the card reader in online or bypass 
modes. If the command is accepted, the difference 
between the time in the command and $TC will be 
stored in STIMEK for use on all subsequent $TIME 
operations. 

The program (ZTCC, Figure 49) logs the calibra- 
tion with the time as computed with the original con- 
stant. 

The REJECT Command 

The operator may pre-reject a job by use of the 
REJECT command. This should be used only in the 
overlapped mode via system input, but it will act like 
the EOJ command if entered via the operator's source 
in the bypass mode. 

The matrix mask is tested for validity of the 
request (ZREJCT, Figure 50). If the source is opera- 
tor and the mode is bypass, a branch is made to the 
$EOJ routine for the processing of end-of-job. If 
the request is from Job Control 4 overlapped, a nor- 
mal return is made via JNOPX; if from the input pro- 
gram card reader in the unoverlapped mode, an error 
message is sent to the operator via ZEREX2. If the 
command is entered through Job Control 1, the return 
address parameter in the tentacle table is set to error 
return and exit is made via ZEXITX. This will return 
control to Job Control, which will note the error 
return and the code, and reject the previous job. 

The EOJ Command 

The End of Job command is used to terminate the 
presently operating problem program without pro- 
ducing a dump. 

The matrix mask is tested for the valid conditions 
for EOJ (ZEOJ, Figure 50). These consists of a 
request from the console or from Job Control 1 in 
the online mode. If either of these conditions are 
met, $EOJ is primed, a message is printed through 
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output program, and the operator is informed of the 
operation. Bit YEOJS is set to permit JC4 to termi- 
nate a processor chain. A normal exit is then made 
through the mainstream exit routine via ZEXITX. 

If the matrix mask shows that Job Control 4 is the 
source and the online mode is in control, the com- 
mand has already been executed, and a normal return 
is made via JNOPX. For any other masks, an error 
exit is made via ZEREX2. If EOJ is given between 
jobs or before the first job, an error exit to ZEREX2 
is made. 



The ABEOJ Command 

The ABEOJ command is implemented in the same 
manner as EOJ, except that $ABEOJ is primed and 
no control bit is required (ZABEND, Figure 50). 

I-O Control Commands 

Four commands influence I-O operations. Two of 
these, OUTPUT and REWIND, are concerned with 
terminating operations of the system input and output 
tapes. The EOF command is used to indicate an 
intentional EOF at the card reader in the online mode. 
The fourth, lOCHANGE, is concerned with changes 
in the availability of physical I-O devices. 

The OUTPUT Command 

The OUTPUT command is designed to permit the 
operator to force a change of the output tape before 
the beginning of the next job, thus starting the next 
job on a new output tape. 

The command is accepted (JOUTP, Figure 50) if 
the matrix mask shows Job Control 4 in any mode, or 
if the source is the console. The pseudo-op, 
SOUTPT, is given to the output program, and upon 
return the operator is informed via the commentator 
of the action. A normal exit is then made. 

If the matrix shows that Job Control 1 is the source 
of the command, a normal exit via JFINX is given 
since the command will be executed in phase 4. Any 
other matrix is an error and an error exit will be 
made via ZEREX2. 

The EOF Command 

The EOF command is used to permit the input pro- 
gram to rewind the write tape at tape switch time if 
necessary. It is a substitute for a non-existing job 
and means that there are no more cards available at 
the present time through the card reader, and that an 
end of file may be written. It also is used by the 
logger entries as an accounting device for idle time. 



If the source is JCl in online mode, a branch is 
made to ZE0F19 (JEOF, Figure 50), which is an 
MCP calling linkage to SLOGl. Following this, a 
branch is made to JDOIT which is an MCP calling 
linkage to the input program to indicate an EOF condi- 
tion. If there are more cards following the EOF card, 
an end return will be made, which causes the EOF 
command to take an error exit ZEREX2. Otherwise, 
the normal exit (ZEXITX) is made. If the source is 
JC4 in bypass mode, an entry to SLOG4 is made at 
ZEOFIO; upon return, control is given to JDOIT. 

K JCl in offline mode is the source, ZE0F19 is 
entered and then exit made via JNOPX. If JC4 over- 
lapped is the source, ZEOFIO is entered and then exit 
made via JNOPX. Any other source causes error 
exit via ZEREX2. 

The REWIND Command 

The REWIND command is a request to terminate and 
rewind the present online write tape. 

The console is not considered a legal source for 
this command. The input program card reader is 
the only source, and the parameter REWIND is the 
only one following COMD, as in: COMD, REWIND. 

The only acceptable matrix for the REWIND com- 
mand is the Job Control 1 source and the online mode 
(JREWD, Figure 49). The pseudo-op, SKOM, is 
given to the input program and a comment to the 
operator precedes a normal exit from the routine. 
If the matrix is Job Control 4 online, a normal exit 
is made since the command has been executed 
already. All other matrices are considered in error. 

The lOCHANGE Command 

The lOCHANGE command is the method by which the 
operator may make a unit or an entire channel avail- 
able or not available to the system. If an MCP unit 
or channel is made not available, an attempt will be 
made to assign a similar piece of equipment to MCP. 
A unit or channel is available if it is physically 
capable of being operated by the system. A unit is 
assigned if it is presently logically connected to 
either MCP, or the PP which is presently operating. 
The format for both console and card is: 

COMD, lOCHANGE, Channel, Unit, Code, Type 
where: 

Channel is the decimal number of the channel. 
Unit is the decimal number, 0-7, of the unit. It 
is applicable only when a unit is being acted upon 
as distinct from a command relating to an entire 
channel. In the latter case, the symbol ALL 
should be used. 
Code permits one of three available options to be 
requested: 
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ADD — this makes a unit or channel available. 
DELETE — this makes a unit or channel unavail- 
able and is normally given in 
response to a service request from 
a program which has had repeated 
failures on a unit or channel. 
DELETM — this makes a unit or channel unavail- 
able for maintenance purposes. It 
is restricted to units or channels 
which are not assigned to MCP or 
to an operating PP. An error 
return will be given if DELETM is 
requested for an assigned unit. 
Type is used only if the Code is ADD. It must be 
one of the following: 
READER 
PRINTER 
PUNCH 

If the operation is ADD and the channel is a single- 
unit channel, a different type of equipment may be 
attached. If the subfield is null, the Channel Status 
Table will reflect the same type of equipment. For 
both channel and unit numbers, if a request is given 
for a piece of equipment which has no corresponding 
Channel or Unit Status Table entry, an error return 
will be given. 

Note: If a deletion of an MCP unit is requested, it 
may cause the ending of the currently cperating PP. 

Validity Testing: The matrix mask for source and 
operating mode is tested for valid lOCHANGE situa- 
tions (ZIOCH, Figure 51). If the request is from 
Job Control 4 in the overlapped mode, it has already 
been processed, and a normal exit is made via 
JNOPX. If the source is operator or Job Control 1 
online, or unoverlapped Job Control 4, the command 
will be implemented. If these conditions do not exist, 
an error return is given via ZEREX2. 

After validity checking of the command request, 
the channel number is obtained from the command 
message. If a disk channel, a branch is made to a 
special disk routine ZDSKCH. If it is not a disk 
channel, the channel number is tested for a valid 
basic exchange channel number. An error exit is 
made if the channel number is not possible for the 
present configuration. This is determined by refer- 
ence to SXCHAN. 

Unit or Entire Channel Change: Upon completion of 
validity testing of the channel number, it must be 
determined if the request is for a unit change or an 
entire channel change. If the request is for a unit 
change, the unit number is tested against the number 
of unit status table entries for the channel. If the 
unit number is high, an error exit is made. If the 



request is for an entire channel change, a switch PGl 
(ZINDCH) is set, and in either case, unit or channel, 
control is returned to the next test at ZACTON. 

If the channel is a multi-unit channel, the system 
configuration change bit SCHFCG is set on. At this 
point, a test is made of the entire channel change 
switch ZINDCH. The action for a unit or entire 
channel is very similar, but the two must be per- 
formed separately because of minor differences. 
They will be discussed jointly, with minor differences 
noted. 

The operation code is tested, and if it is ADD, a 
branch is made to the unit or channel add routines 
ZADDCH or ZADDUN (Figure 51). If not ADD, the 
op code must be DELETE or DELETM. The available 
bit for the unit or channel is tested, and if not pre- 
sently available an error exit is made. If it is avail- 
able, the channel or unit is made not available. At 
this point, if the request is to delete an entire multi- 
unit channel, a branch is made to ZMULCH (Figure 
52). If the unit is not assigned (ZQUES, Figure 52), 
a test is made for DELETE or DELETM at ZMAIND. 
If either, a normal exit is made; if neither, error 
exit ZEREXl is made. 

If the unit is assigned, a test is made for DELETE. 
If not DELETE, an error has occurred, since an 
attempt was made to delete an assigned unit for main- 
tenance. In this case, at ZMNERX (Figure 52), the 
unit or channel is made available again, the configu- 
ration change bit is reset, and an error exit is made, 
with an explanatory message. If DELETE, the unit 
is set unassigned. If the unit was owned by the prob- 
lem program, a branch is made to ZABEOJ, $ABEOJ 
is primed, a message is written through the output 
program, a comment is made to the operator about 
the change, and a normal exit is made. If the unit 
was owned by MCP, a scan of the status tables by 
ZCHSCN (Figure 53) must be made to find a replace- 
ment unit. After return from the scan, a normal 
exit is made via ZDONE to ZEXITX. 

Multiple Unit Channel Deletion: In the case of a 
multiple-unit channel, when an entire channel is to be 
deleted, the special case of both MCP and PP owned 
units on the same channel must be solved. If PP 
units are on the channel, the PP must be removed by 
$ABEOJ eventually. If MCP units are on the channel, 
replacements must be found, each one individually by 
the scan routine. The procedure for deleting an entire 
multi-unit channel at ZMULCH (Figure 52) begins by 
the count of units on the channel being established and 
used as a control by index. A test is made to deter- 
mine if the indexed unit is assigned. If not assigned, 
a branch is made to ZQUSll which tests if the code 
has been examined for DELETE or DELETM. If not, 
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Figure 51 - The lOCHANGE Cominand - Chart 1 
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Figure 53 - The lOCHANGE Command - Chart 3 



it is tested. If illegal, the channel is made available, 
the configuration bit is reset, and an error exit is 
made. If the code is legal, a switch is set PG6 
(ZOPTST) to show that it has been tested. At ZQUES2 
a test is made to see if there are more units to test 
on the channel. If so, a branch is made back to 
ZQUESl to see if the next unit is assigned. If there 
are no more units to test, a switch PG5 (ZASUIN) is 
tested to determine if any units on the channel were 
assigned. If not, the code is tested at ZMAIND for 
validity, and error or normal exit is taken, depending 
on the outcome. PG2 (ZPPCHD) is tested; if there 
were assigned units on the channel and at least one 
was PP owned, a $ABEOJ should have been given for 
the PP. In either case, whether or not there were 
PP units on the channel, a comment is made to the 
operator about the change, and a normal return made 
via ZDONE. 

Previously, at ZQUESl, if the indexed unit tested 
was assigned, a switch PG5 (ZASUIN) was set for 
later use and the code is tested for legality. If 
illegal, a branch is made to ZMNERX and the channel 
is made available again, the configuration change bit 
is reset, and an error exit is made. If the code is a 
legal DELETE, the question of ownership arises for 
the unit under examination. If PP owned, a switch 
PG2 (ZPPCHD) is set for later use, and then a test 
is made for any more units to be examined on the 
channel at ZQUES2, described previously. 

If the indexed unit was owned by MOP and not PP, 
the unit is set unas signed, and a branch is made to 
find a replacement via the ZCHSCN scan routine. 
Upon return, a branch is made back to ZQUES2 to 
determine if there are more units to examine on 
the channel. 

For the ADD code, a test is made at ZADDCH or 
ZADDUN of unit or channel availability. If already 
available, an error return is given via ZEREXl. If 
not, the unit or channel is made available and the 
status table is cleared. If a single-unit channel, the 
type of equipment on the lOCHANGE request is entered 
in the status table via ZINSRT, and a comment is 
made to the operator before normal exit. 

At ZDSKCH, the disk routine tests if the request 
is for an entire channel. If not, an error exit is 
made. If so, a test for ADD code is made. If it is 
an ADD request, and the channel is already available, 
an error return is made via ZEREXl. If unavailable, 
the channel is made available, the configuration change 
bit is set, and a normal return is given via ZDONE. 

Replacing an Unavailable MCP Unit : The scan 
routine (ZCHSCN, Figure 53) for MCP unit replace- 
ment attempts to find an unassigned unit of the same 



type to replace the MCP unit being made unavailable. 
If unassigned units are not to be had, the PP will be 
given a $ABEOJ and one of its units will be assigned 
to MCP. If even removal of the PP will not produce 
a unit for MCP, the operator will be told by $COMM, 
the VF of $9 will be cleared to indicate an error and 
control returned to the user. These objectives are 
accomplished in the following manner. 

Indexes are initialized for the channel and unit 
status tables as necessary. At ZLOPO a test of 
equipment is made on the indexed channel status 
entry against the type of equipment on the channel to 
which the deletion has reference. If not equal, the 
channel entry index is incremented at ZLOPl and a 
new channel is examined until no more channels 
exist, at which point it would branch to ZREMOV. 
At ZREMOV if no more channels exist to be examined 
and no available channels had equivalent equipment, 
an error exit is made with the appropriate comment 
to the operator at ZNTFND. If there are available 
channels of the same type of equipment, they must 
have had assigned units. Therefore, a second pass 
must be made through the scan to remove the PP 
units and give them to MCP. A switch is set at 
ZREMVl so that this sequence is followed only once, 
since the assigned units could have been MCP and 
would not have been obtainable, and a branch is made 
back to ZCHSCN. 

If similar equipment is found in the search at 
ZLOPO, then (at ZOKEQP) the channel availability is 
tested. If the channel is not available, the search is 
continued at ZLOPl. If the channel is available, the 
availability of a unit is queried at ZIGZAG. If the 
unit is not available, other units on the channel are 
examined, until either a unit is found which is avail- 
able or no more units exist on the channel. In the 
latter case, return is made to ZLOPl to determine 
whether any more channels exist for test. 

When an available unit is found, control passes to 
ZAVLUN and again the question must be asked if this 
is the second pass through the scan. If it is, the first 
PP assigned unit found will be taken. If the unit is 
owned by MCP, a branch is made to ZTSTPP to 
determine if any more units are to be tested. When 
a PP unit is found, the ownership bit is set to MCP 
and the unit is protected from unassignment when the 
eventual $ABEOJ is implemented. $ABE0J is 
primed and a switch PG3 (ZPRABJ) is set to tell 
other sections that the PP has been already primed 
for $ABE0J. a message is also put out through the 
output program and a comment made to the operator. 
If the channel is in operation or in setup, the program 
will loop until the channel is not operating. A branch 
is then made to ZSETAS which will clean out the 



106 



status tables of PP information, set a new unit area 
address in the unit status table, new unit and channel 
numbers in the unit area, and put out a message to 
the operator to change units. A return is then made 
to the user of the scan routine within lOCHANGE. 
Within ZSETAS there is a branch switch at ZLODLP 
for use by special assignment. This permits a 
branch out before the regular message generator of 
ZCHSCN is used. 

At ZAVLUN, if it was not the second pass through 
the scan, and the unit being examined is assigned, 
a branch is made to ZTSTUNto test for more units. 
If an unassigned unit is found, unit ownership is set 
to MCP, and the above cleanup routine of tables, etc. , 
is entered at ZSETAS. 
The Special Assignment Routine 

The special assignment routine (Figure 54) is used by 
the command package or the input program under the 
following circumstances: 

1 . A mode change has been requested which requires 
that tapes be assigned for use by the input program. 



2. A mode change to off-line has been requested, 
and the card, reader must be unassigned to be made 
available to problem program. 

3. An lOCHANGE command has been requested 
which requires re-assignment of MCP units. 

The special assignment subroutine consists of two 
routines using a common subroutine. When assign- 
ment is required, the linkage is: 

SIC, ZCOM90 

B, ZASNOl 

VF, (lOD number) 
When disassignment is required, the linkage is: 

SIC, ZCOM90 

B, ZDSNOl 

VF, (lOD number) 

The two routines, ZASNOl and ZDSNOl, use a 
common subroutine, ZCOMOl, to save indicies and 
set up status table references. Dispatcher error 
control is entered if the lOD number is zero (type 4), 
or if either a unit cannot be found to assign, or the 
unit to be disassigned is not presently assigned or is 
suppressed (type 82). 
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Figure 54 - The Special Assignment Routine 
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The three major packages in MCP that perform sys- 
tem I-O functions for both PP and MCP are: 

1 . The input program 

2 . The output program 

3. The disk fetch program 

The input program is designed to overlap preproc- 
essing with input data transmission. It keeps two 
input sources active, one for phase 1 and one for 
phase 4, and handles the details of tape switch for 
the input sources and mode change. It performs one 
pseudo-op, $SCR, for both PP and MCP; and two 
others, SCR4 and SKOM, available only to MCP. 

The output program blocks information into print 
and punch records on the output tape, and attends to 
output tape control and separation of the output of 
jobs. It performs the pseudo-ops $SPR and $SPU; 
the output command; and its special EOJ pseudo-op, 
SSPEOJ. 

The disk fetch program performs the $ FETCH 
pseudo-op to read named material from PROSA. 



job; and Phase 4, the execution of the job. * The 
overlapped mode is further divided into two modes: 
online and offline, according to the phase 1 input 
source. If the phase 1 input source consists of cards 
from the online card reader, the overlapped mode is 
online. If the phase 1 input source consists of card 
images fromi a magnetic tape prepared by one of the 
system peripheral input programs on the IBM 1401, 
the overlapped mode is offline. 

The second of the two logical system input modes 
is the bypass mode. The bypass mode is so named 
because the phase 1 function of scanning I-O requests 
is bypassed. All I-O assignment is done on a per 
job basis, immediately prior to execution of the job. 
The bypass mode is provided to allow interruption of 
overlapped operation under priority or emergency 
circumstances. Accordingly, the only input source 
in the bjrpass mode is the online card reader. 

Overlapped Operation 



THE INPUT PROGRAM 

The input program is a major package which performs 
three pseudo-ops. It uses two tentacle tables, and 
operates enabled but usually in SIO mode. Its basic 
function is to pass input (cards) to JCl and JC4 (see 
system operation programs) , and to the PP. 

The logic of the input prc^ram is almost completely 
determined by system mode definitions. Therefore, 
before discussing the program itself, system input 
modes will be reviewed from the point of view of the 
input program. 

System Input Modes 

There are two logical modes of system input: over- 
lapped and bjrpass. The overlapped mode is so named 
because two functions are being performed at one 
time: 

1. Scanning of input (jobs) for purposes of pre- 
assignment of tape units. 

2. Buffering of input (jobs) in order to execute 
jobs. 

The processing of a given job is considered in two 
phases: Phase 1, scanning the I-O requests for the 



* The titles "Phase 1" and "Phase 4" were chosen to 
allow insertion of intermediate phases for multi- 
programming purposes at such time as this is 
desired. 



The input programs use two buffers, the phase 1 
buffer (VBFl) and the phase 4 buffer (VBF4) . Each 
handles the buffering requirements of its phase. Each 
has a capacity of 34 card images, or two 17-column 
binary card blocked records. 

Input from the phase 1 source is read into the phase 
1 buffer as buffer space becomes available. If job 
control 1 is not currently processing cards, the SJCl 
pseudo-op is primed. This results in an entry to JCl, 
which will resume its scanning of B cards. The buffer 
is used (scan pointer moved) only by SCRl and SCAN 
requests. 

The phase 4 input source is the read tape. All 
information on the read tape has passed through phase 
1. Input is read from the read tape as space in the 
phase 4 buffer becomes available. However, a pro- 
gram will not be primed as a result of phase 4 input. 
The buffer is used (card request pointer moved) by 
phase 4 card requests ($SCR, SSCR4) and by the 
SEJSCN request. 

If the overlapped mode is offline, the phase 1 input 
source is the scan tape. This tape will become the 
read tape for phase 4 when it has been completely 
scanned and the current read tape is completely 
processed. 

If the overlapped mode is online, a tape must be 
prepared for use as the phase 4 read tape. This tape 
is called the write tape. In the online mode, phase 1 
input is blocked onto the write tape as a part of phase 
1 operation. In this mode, all tape mounting for the 
input tapes is eliminated since the read tape becomes 
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available for use as a write tape after it has been 
processed. 



Bypass Operation 

Only one functional buffer is required for bypass 
operation, since phase 1 is eliminated. Physically, 
the phase 1 buffer is used, since it must serve as a 
buffer for the card reader in online operation and 
card reader controls exist for it. Functionally, it is 
used as the phase 4 buffer to service $SCR, SSCR4, 
and SEJSCN requests. 



Input Program Pseudo-Ops 

The input program services three pseudo-ops: the 
two card requests, $SCR and SSCR4; and the input 
command pseudo-op, SKOM. The card request 
pseudo-ops differ slightly, as described in System 
Operation. However, they use a common tentacle 
table and are carried out by one program, the card 
request routine. 

The SKOM pseudo-op is handled by another program 
and tentacle table. This pseudo-op has eight sub- 
types, referred to as the input commands. (See 
System Operation). They are: 
SCRl Phase 1 card request 

SCAN Phase 1 scan request 

SEJSCN Phase 4 scan request 
SONL Transition command to online 

SOFFL Transition command to offline 

SBYP Transition command to bypass 



SEOF Phase 1 command to communicate 

intentional EOF from the card 
reader (online mode). 

SREW Phase 1 command to terminate the 

write tape at this point (online mode). 

General Organization 

The input program may be considered in four cate- 
gories: 

1 . The functional programs 

2. The tape switch routines 

3. The mode transition routines 

4. The I-O fixup routines 

The functional programs do the card processing 
work of the input program. The others do necessary 
housekeeping functions. 



The Functional Programs 

The seven functional programs are: 

1. Card reader 

2. Scan tape 

3. Job boundary scan 

4. Write tape 

5. Read tape 

6. Card request (overlapped) 

7. Card request (bypass) 

The input program processes information through 
two buffers, the phase 1 buffer and the phase 4 buffer; 
it is possible to associate each of the functional pro- 
grams with one of these buffers according to system 
input mode (Figure 55). 
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Figure 55, Functional Programs 
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A bookkeeping system involving control tables and 
queues is used by the functional programs to keep 
track of information and control flow through the 
input program. Each of the seven functional pro- 
grams has an associated control table and queue. 
All control tables have the same format and usage, 
unless a type of information does not apply to the 
functional program. The seven queues are of vari- 
ous lengths, but all use half word entries of similar 
information. 

The Tape Switch Routines 

The input program has two tape switch routines: 
VTSA for the phase 1 tape, and VTSB for the phase 
4 tape. VTSA rewinds the phase 1 tape and notifies 
the phase 4 programs of the availability of a new 
read tape. VTSB rewinds the phase 4 (read) tape, 
and either (online mode) makes it available as a new 
write tape or (offline mode) makes the drive available 
for mounting a new scan tape. Interlocks are provided 
between the tape switch routines and the functional 
programs. 

The Transition Routines 

There are six transition routines in the input pro- 
gram; one for transition from each mode to each of 
the other two. The choices, along with the names of 
the routines, are summarized in Figure 56. 
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Online 
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Bypass 
Offline 
Bypass 
Online 


Bypass 
Bypass 
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Online 
Offline 
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Bypass from Online 
Offline from Online 
Bypass from Offline 
Online from Offline 


VONLIB 

VOFFLB 

VBYPAN 

VOFFLN 

VBYPAF 
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Figure 56. The Six Transition Routines 



Each transition routine has two basic functions: 
to put the requested mode in effect, and to insure that 
operation in the previous mode is terminated in an 
orderly manner with no information lost. This will 
generally require that the transition routines influence 
the operation of the functional programs and the tape 
switch routines. 

The I-O Fixups 

The input program uses three I-O units: the card 
reader, the phase 1 tape, and the phase 4 tape. The 
fixup routines must attend to error recovery, and 
must notify the appropriate functional program of the 
end of an I-O operation, either by EOP or EE. 

Program Operation 

The input program receives control by two means: 
a pseudo-op request, and an I-O interrupt. Control 
is given to the functional program most directly 
affected by that entry (e.g., the buffer scan program 
is entered when SCRl or any scan operation is 
requested). If that program does anything to change 
the buffer situation, then control must be given to 
other programs affected by that change. When it is 
established that nothing further can be done by any 
programs, the input program gives up control with 
$RET. 

Note that the same programs will be used whether 
the entry is a pseudo-op request or an I-O interrupt. 
Thus, it is necessary to run in the SIO mode so that 
input I-O interrupts will not be released. 

The Functional Program Operation 

Each functional program has a control table and a 
queue. The control words for the queue are stored 
in the control table. The control table is referenced 
by use of the symbolic index register, VU. In general, 
a functional program is entered when it is necessary 
to make entries in its queue, and, once entered, it 
performs as much processing as possible before 
yielding control. 
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Control Tables 

Every control table has the same format and uses the 
same symbolism to specify a particular field in the 
table. Its format and symbolsim are shown in Figure 
57. 

Transfer of Control 

All functional programs ultimately return control to 
their predecessor. For a given mode, at most three 
functional programs will be involved in a normal pass 
through the input program. However, any one of the 
three may have been the one originally entered by a 
pseudo-op request or I-O interrupt, and must be the 
one to give $RET. 

The functional programs use a scheme for passing 
control to successor programs which insures proper 
flow back through predecessors and, ultimately, 
issuance of $RET. Multiple passes are also allowed 
around the three programs, resulting in multiple 
entries to the same program. The scheme consists 
simply of a table of return addresses and a pointer 
which (effectively) points to $RET when it reaches 
zero. An index register, symbolically designated 
VP, is initially loaded with XW, VDDB, 0. A suc- 
cessor program is entered with the linkage 

SIC, (VP); CB+, VP, VNX(VU) 
or, in the event the table pointer, index VU, is one 
not permitted in the J field of a CB instruction, the 
linkage 

SIC, (VP); CB+, VP, VNXT 
is used. VNXT is B, VNX(VU) . 

The result is the development of a table of return 
addresses at VPDB. Return linkage then is 

CB-, VP, -1.0 (VP) 

Queues 

Each functional program uses a queue. In normal 
flow, a program is entered with an entry for its 
queue specified. It then tries to process as many of 
the entries in the queue as it can. 

The length of the queues varies with program. An 
entry is a half-word, and is either a positive integer 
or a negative address. A positive integer represents 
the number of card positions ready for processing by 
that program in the buffer it uses. A negative address 
indicates the logical end of cards (i. e. , job boundary), 
and the location to which the program should branch 
when the entry comes up for processing. 

Parameter Flow 

Each functional program has two basic responsibilities: 
1. Performance of its basic function, such as 




initiating a card or tape read or transmitting card 
images, and 

2. Advising its successor program of changes in 
the buffer situation. 

The first responsibility is peculiar to the particular 
functional program. The second is standard among 
all functional programs, and involves the passage of 
parameters to the queue of the successor program. 

Consider operations on the phase 1 buffer in the 
online mode. The three programs involved are the 
card reader control, the buffer scan program, and 
write tape control. For convenience of discussion, 
let these programs be represented by the symbols 
CR, SC, and WT, respectively. Then CR must 
advise SC of cards read and available for scanning, 
and SC must advise WT of cards scanned and avail- 
able for writing, and WT must advise CR of buffer 
space (card positions) available for card reading. 
Control of the phase 1 buffer in online operation may 
be seen as a cyclic passage of parameters from one 
program to the next as illustrated by the circle. 



WT 



The function of the queue now becomes apparent. 
A parameter is passed by giving control to a program 
with the parameter specified for entry into its queue. 
Similarly, the functions of the control table entries 
VX, VXl, VX2S, VX2R, and VNX should now have 
assumed significance. Figure 58 illustrates this 
passage of parameters for both buffers in all modes, 
using the following symbolism for the functional pro- 
grams: 

Card reader program CR 

Job boundary scan program SC 

Write tape program WT 

Read tape program RT 

Scan tape program ST 

Card request program (overlapped) Q 
Card request program (bypass) E 

When a program receives an item for its queue, 
it stores it in the first available position in the queue. 
Then, if the program is not busy on a previous opera- 
tion, the next parameter in the queue (not necessarily 
the one just entered) is removed and action based on 
the parameter is started. If this action results in a 
change in the buffer situations, the succeeding pro- 
gram must be notified by an appropriate parameter 
entry in its queue, and the process repeated. 

There are several situations in which a functional 
program determines that a special action must be 
taken at a time which depends on the operation of its 
successor. The program then may pass a negative 
address to that program identifying the special action 
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Word 


1 
2 
3 
4 
5 
6 
7 



Table Structure 
.32 



Symbol Format 



.63 



VX 




VXl 




VX2S 



VX2R 



(VCWR - 1.0) 



VCWR 



VNX 



VSU 



VRCNT 



VSTR 




VIO 



VFCNX 




Symbol 



VX 



Format 



VF 



VXl 



VF 



VX2S 



XW 



VX2R 



XW 



VCWR 



CW 



Content 

An integer beftveen -34 and 
zero locating a card position 
in a 34 card buffer (phase 1 
or 4). Not used in the table 
for the buffer scan program. 

An integer between and 34 
specifying the number of 
cards currently being pro- 
cessed by the program in the 
buffer. Used by all programs. 

An XW to control storing in 
the program's queue. The 
VF specifies the next store 
address, and the count and 
refill fields are used to cycle 
around the queue. Used by 
all programs. 

An XW to control removing 
entries from the program's 
queue. The VF specifies the 
next entry to be removed, and 
the count and refill fields aie 
used to cycle aroimd the 
queue. Used by all programs. 

A CW to control transmission 
of data into or out of the 
buffers (VBFl for phase 1, 
VBF2 for phase 4). If two 
control words are required, the 
word at VCWR- 1 . is used to 
control the transmission 
starting at the beginning of 
the buffer, and the first 
CW chained to it. These 
slots are not used in the buffer 



VNX 



HaU Word 



VIO 



Half Word 



VSU 



Address 



VRQB 



VF 



VRCNT 



VFCNT 



VSTR 



VF 



VF 



VTS 



Half Word 



VF 



VFCNX 



CF 



Figure 57. Control Table Format and Symbols 



Content 

scan table, since that program 
does no data transmission, 

A half word branch to the 
logical successor program 
for the current mode. (See 
program linkage. ) This is 
fixed for every program ex- 
cept buffer scan, in which 
case the successor is set by 
the transition routines ac- 
cording to mode. 

A half word branch to be 
used after an EOF to initiate 
additional I-O. Is not used 
in non-l-O programs; i.e., 
not in buffer scan or card 
request tables. The branch 
is permanent. 

lOD reference number for 
unit currently assigned to 
that program. Not used in 
the tables for buffer scan 
and card request programs. 
Variable in tape control 
programs, and set by the 
tape switch program. 

Used by tape I-O control 
programs to store the resi- 
dual after blocking; e. g. , 
in the scan tape table the 
number of cards positions 
in the buffer still available 
after initiating a read of a 
block (17 cards). 

Used by the tape control 
programs to store the num- 
ber of records processed in 
the current file. 

Used by the tape control 
programs to store the num- 
ber of files processed on the 
current tape . 

Permanent branch to proper 
entry point after tape switch. 
Used only by tape control 
programs. 

Used by read tape and scan 
tape control programs; con- 
tains a parameter for queue 
entry when end of tape is 
encountered. 

Used only in the table for the 
read tape program. Contains 
the number of files (jobs) re- 
maining on the read tape. 
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Figure 58. Passage of Buffer Parameters 



to be taken when that point in its queue is reached. 
For example, if the job boundary scan program 
received 10 cards from the card reader program and 
found a job boundary after the third card, it would 
pass to the write tape program the parameters 3, 
-VWEFT, 7, in that order (one at a time). The write 
tape prc^ram would branch to VWEFT to write a 
file mark when it encountered the -VWEFT in its 
queue. 

Each functional program has a subroutine whose 
function is to enter a parameter in the queue. The 
parameter is given in index register, VT5, and the 
various programs are entered at the Q entry point 
for this purpose. The symbols associated with each 
functional program are listed in Figure 59. 
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Figure 59. Functional Program Symbols 



As the queue is used, VX2S and VX2R are occa- 
sionally updated by means of the instruction, V+ICR, 
(XR), . 32 so that the references move upward in 
memory over the queue and then recycle starting at 
the low-order position. VX2S and VX2R are indirectly 
interlocked so that VX2R never passes VX2S. Thus, 
the queue is maintained on a first-in first-out basis 
consistent with processing buffer areas and negative 
parameters in proper order. 

The VCOM Subroutine: VCOM (Figure 60) maintains 
the VX2S pointer so that it is always pointing to the 
last positive parameter entered. When positive 
parameters are received they are simply added into 
the position designated by VX2S, which remains 
unchanged. When a negative parameter is received 
VX2S is updated, the negative parameter is stored, 
VX2S is again updated, and zero is stored. An 
example is given for a queue of 5 positions: 
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* Indicates the cell referenced by VX2S 



Queue Manipulation 

Considering a queue as composed of N consecutive 
half words, then the queue store and remove refer- 
ences, VX2S and VX2R, are of the form: 
K XW, Queue, N, K. 



The accumulation of successive positive parameters 
is significant because it overcomes the many influ- 
ences tending to fragment buffer areas (for example, 
the job boundaries). 
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The VSETX Subroutine: The VSETX routine (Figure 
60) performs the function of removing from a queue 
a single parameter, returning to the calling program 
with the parameter if it is positive, or branching to 
the location addressed by the absolute value of the 
parameter if it is negative. The cell containing the 
parameter removed is set to zero. VSETX uses 
VX2R in removing parameters from the queue and 
updates VX2R in a manner that preserve the order 
and continuity of the queue. First, like VX2S, VX2R 
never remains on a queue entry, which is negative. 
If VSETX finds a positive parameter, it is removed 
and VX2R remains unchanged. If the entry is zero, 
the next entry is tested and if zero, then zero is 
returned to the calling program and VX2R again 
remains the same. If the next entry is positive VX2R 
is advanced to that slot and the parameter is removed. 
If the entry is negative, it is removed and VX2R 
advances to the following slot. The following example 
illustrates this process: 











Parameter Just 


Queue after Parameter has Been Removed Removed by VSETX 


Sf -WEFT 


7 


6 







Initially 


O -WEFT 


7 


6 







3 


04- 


7 


6 





Step 1 


-WEFT 





7-H 


6 





Step 2 







0+ 


6 







7 








Of 







6 








Of 











+ Indicates position of VX2R pointer 



The interaction of the entry and removal process 
is exhibited in the following example: 
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It was mentioned previously that a functional pro- 
gram would, after inserting a parameter, remove and 
act upon the next parameter if it were not already busy. 
This action centers about the active parameter, VXl, 
whose value has a double significance. First, zero 
or non-zero respectively indicates whether the pro- 
gram is not busy or busy. Second, the value, if 
positive, is the number of cards in the buffer area 
being processed, and if negative, identifies the special 
operation now in progress. If VXl is zero, the inter- 
face routine enters VSETX, which will remove a 
single parameter from VX2. If the parameter is non- 
negative, control returns with the parameter index 
register VT2, which is stored in VXl, and then the 
function characteristic of the program is performed 
on the buffer area. If the parameter is negative, 
VSETX makes a CB+ type entry to the location given 
by the parameter. Since VSETX is entered by a 
SIC, . . . B, . . . sequence, the net effect is as if the 
program calling VSETX had instead made a CB+ type 
entry to the special sequence addressed by the nega- 
tive parameter. Each special sequence can thereby 
maintain the continuity of control. There are various 
alternatives that may be used depending mainly on 
whether the special sequence completes its operation 
immediately or only initiates it. In the former case, 
the instruction CB-, VP, SETX may terminate the 
sequence. That is, a CB- type entry to VSETX is 
effected, the net effect being as if a SIC, . . . B, — 
type entry was made from the original calling pro- 
gram. This preserves the continuity of both program 
control and parameter flow. In the case when a 
special sequence only initiates an operation, param- 
eter flow must be suspended until the operation is 
complete. This may be done by "faking" a return 
from VSETX with a zero parameter, or, subject to 
certain conditions, by returning one level higher than 
the program that called SETX. Here, the continuity 
of control is maintained but that of parameter must 
be held over in VXl, thus suspending flow continu- 
ity until an operation is completed. 

The VSETUP Subroutine: VSETUP (Figure 60) is the 
subroutine usually used to maintain parameter flow. 
It is entered by a SIC, . . . ;B, . . . type entry, and 
returns a zero parameter to the calling program if 
the program is busy; otherwise, it behaves like 
VSETX. The normal calling sequence is: 

SIC, (VP); B, VSETUP 

BXVZ, 'do no more work 

SV, VT2, VX1(VU) 

'process new active parameter 

VSETX is normally used when it is desired to 
resume parameter flow after an extended operation 
has been completed. In this case the normal envi- 
ronment is: 
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Figure 60 - The Input Program - Queue ManiEulation 
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SIC, (VP); B, VSETX 
SV, VT2, VXl(VU) 

BXVZ, 'do no work 

'process new parameter 

The basic difference between- VSETX and VSETUP 
is that VSETUP is used when the program may 
already be busy, as when entered at the queue entry 
point, and VSETX is used when the program is 
known not to be busy as at the EOP entry. 

The VBLOC Subroutine: The VBLOC subroutine 
(Figure 60) is used in the same manner as the VCOM 
subroutine, but it has additional functions. It is 
used by those programs concerned with blocked tape 
records . Instead of entering a parameter in the 
queue directly, it adds it to VRQB, the residual after 
blocking. If the result is less than 17, it is stored 
in VRQB and control returned to the user. If the 
result is 17 or greater, 17 is entered in the queue, 
VX2S is stepped, and subroutine VACTX used to 
attempt an I-O operation. When control is returned, 
the process is repeated until the residual is less 
than 17, where upon it is stored in VRQB and control 
returned to the user. 

Buffer Processing 

Every positive quantity put into VXl represents an 
amount of buffer area which must be processed by 
the functional program. Generally, the processing 
routines must give up control after initiating an 
operation, and, in order to maintain the continuity 
of overall operation, the input program must have 
control when the processing of a buffer area is com- 
plete. This control comes about in three ways: 

1 . The input program completes the processing 
of the buffer area solely under its own control. This 
occurs when job boundary scanning in bypass mode 
and in overlapped mode when it is not necessary to 
prime job control one (JCl). 

2. The input program has control as the result of 
an externally generated request for a card or cards 
which results in the last card of an area being used. 
The requests possible and the related functional pro- 
grams are SSCR4 (E or Q), $SCR (E or Q), SCRl (SC 
overlapped) and SCAN (SC overlapped) . 

3. The input program receives control through one 
of its tables of exits after the completion of an I-O 
operation. 

All of the buffer processing programs have to up- 
date VX to reflect changes in buffer area origin. 
Initially all of the VX parameters in a circle of func- 
tional programs are in phase, reflecting the fact that 
each functional program will begin processing on the 
same card image. By the time each has finished 



processing a buffer area, VX will be updated by the 
amount VXl. 

The VMD Subroutine: To process a buffer area it is 
usually necessary to convert VX and VXl into an 
explicit representation of memory area which usually 
takes the form of a control word or words. This 
conversion is done by the VMD subroutine (Figure 61) 
which modifies the two control words In the program 
table according to two parameters given it repre- 
senting buffer origin and buffer length. The two con- 
trol words are located at VCWR-1 and VCWR within 
the program tables of CR, WT, E, and Q, and a 
typical set is: 

CW, VBFl, 0, $ VCWR-1. 

CW, 0, 0, VCWR 

All but the count field of the first word is a constant 
which serves as a model for VMD in constructing 
explicit control words; in particular, the value field 
contains the origin, VBFl (phase 1) or VBF2 (phase 4) , 
to which the program applies. If x, an integer between 
-34 and -1 inclusive representing buffer origin, and 
C, an integer between 1 and 34 inclusive representing 
buffer length, were the parameters which VMD 
received, VMD would operate as follows: 

1. The value field of VCWR is replaced by 15* 
(34 +x) plus the value field of the model. 

2. The multiple bit of VCWR is set equal to that 
of the model. 

3. The count field of VCWR is replaced by 15*C 
if C+x <0 or 15 * (-X) if C + x:>0. If C + x:>0, it 
means that the buffer area wraps around the end of 
the physical buffer and therefore an additional step 
(4) is needed to produce the necessary chained con- 
trol words. 

4. If C + x>0, set the count field of VCWR-1. 
equal to 15 * (C + x) , turn on the chain bit of VCWR, 
and set the refill field of VCWR equal to that of the 
model. 

In the case of RT and ST where only blocked read 
operations are done, it is only necessary to perform 
the instruction R, VCWR(VU) to obtain the control 
word for the next buffer area. SC does not require 
control words in its functioning and employs a special 
technique which is discussed later. 

Buffer Process Categories: The processes performed 
on buffers fall into two categories: CPU processes 
and I-O operations (CR, RT, WT, ST). 

Buffer processes involving only CPU operations 
are: 

1. Servicing of request for card transmission 
(SCR, SCR4). 

2. Servicing of requests for the address of a 
single card in the phase 1 buffer (SCRl). 
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Figure 61 - The Input Program - I-O Actuation 
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3. Scanning to job boundary (SCAN, SEJSCN). 

The first item uses VMD generated control words 
to control the transmit instruction used to move card 
images from the buffer. As each request is proc- 
essed, the VX and VXl parameters are updated and 
a parameter passed on to the successor. Thus proc- 
essing of a given active parameter takes place on a 
piecemeal basis which differs from the I-O situation 
in which an active parameter is processed completely 
in the EOP procedure. However, both are similar in 
that when processing of a buffer area is complete, an 
attempt to resume parameter flow is made. Notice 
that a request for more than one card may exhaust the 
present VXl but still not be completely satisfied, in 
which case the updating, resumption of parameter 
flow, etc. must be accomplished before the rest of the 
request may be processed. Here the flexible linkage 
mechanism is very helpful. 

The second item is similar to the first except that 
control words are not used and the VX parameter 
does not exist in the integer form previously discussed; 
rather, an index word of the format, 

K XW, BFl, 34, K, 
serves the same purpose and is updated singly by the 
instruction V + ICR, VSl, 15. as each card is proc- 
essed. The third item is a control process involving 
the positioning of buffer pointers at job boundaries 
on request. 

The 1-0 operations are performed by three I-O 
actuation routines: VRTIO, VRDIO, and VWIO 
(Figure 61) . All are entered through the VIO slot in 
the table from the VACT, or VACTX subroutine which 
sets up appropriate parameters, x and C, in index 
registers VT3 and VT2. Routines VRDIO and VWIO 
derive the appropriate control words using VMD, 
and perform the appropriate MCP I-O pseudo-op. 
The VACT, VACTX subroutine and VEOP routine 
perform basic functions in this process. 

The I-O Actuation Subroutines: The VACT and 
VACTX subroutines (Figure 61) perform several 
functions necessary to start an I-O operation on a 
buffer area and are used by the WT, RT, ST, and CR 
functional programs. First either VSETX or VSETUP 
(VACT or VACTX) is used and a CB- type return is 
given if a "do no work" condition exists. Otherwise 
a branch is made to VIO(VU) after VX has been 
adjusted. At the VIO slot in the table there is a 
branch to the appropriate I-O actuation routine. 

The distinction between VACT and VACTX is that 
VACT presumes that the I-O unit is available for 
actuation if the need exists, whereas VACTX pre- 
sumes the need exists but that the I-O unit may be 
in use. The distinction is analogous to that between 
VSETUP and VSETX. 



The Standard EOP Routine: When an operation is 
completed (as signalled by an I-O interrupt, or the 
request for the last card of a buffer area by SCRl, 
SCR or SCR4) parameter flow through the program 
is resumed. The VEOP routine is used to perform 
the following three steps: 

1 . The VX parameter is updated by VXl to reflect 
a new buffer origin (If VXl:>-0 only). 

2. A parameter is removed from the queue, there- 
by reinstating parameter flow. 

3. The old parameter is passed on to the successor 
program, thereby maintaining parameter flow. This 
is not done for most negative parameters because 
these do not propagate continuously around the func- 
tional program circle, but rather originate within 
one and end with the successor. 

The Card Reader (CR) Program 

The first functional program to be discussed is 
Card Reader (CR) . The CR reads cards into buffer 
areas under the control of the parameter flow proc- 
ess. When an out- of- material condition at the card 
reader arises, it is recognized and appropriate 
measures taken. The EOP procedure is standard, 
using the VEOP routine. 

The out- of- material condition is signalled by a 
return through the EE slot in the table of exits. Con- 
trol goes from there to the VRDEE routine (Figure 62) 
which effectively passes on to the successor program 
those cards successfully read, saves in the address 
of VREEl the number of cards not read (residue), 
and updates VX by the amount read but leaves VXl 
unchanged. The last step inhibits the issuance of 
subsequent read instructions as the result of param- 
eters entering the queue. Finally, a special negative 
parameter, -VEES, is passed to the successor pro- 
gram, job boundary scan (SC). 

This is the first step in a set of events which may 
result in the message, "Service the card reader" 
being given to the operator. This message cannot be 
given immediately because the EOF and OFFLINE 
commands, which can inhibit the message, are 
recognized only later in SC, if overlapped, and still 
later in E, if unoverlapped. At the appropriate time, 
VEES effectively tests whether or not the EOF condi- 
tion is in effect and if not, it then puts out the message 
via the commentator. 

Upon the receipt of a CS, control goes to the 
VRDCSS routine. This resumes card reading using 
the residue previously stored if the unit ready bit in 
the control word is on, and it also removes the EOF 
condition if it existed. The I-O routine, VRDIO, and 
the queue entry, VRDQ, perform as previously 
described. 
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Figure 62 - The Input Pribram - The Card Reader Prt^ram 



The Job Boundary Scan (SC) Program 

The scan routine (Figure 63) scans the column 1 
positions of cards in the buffer for job boundaries 
which are indicated by the presence of a B, JOB or 
B, COMD card following a non-B card. Cards up to 
and including the non-B belong to the previous job, 
and a positive parameter representing cards up to 
that point is passed on to the successor program: 
card request (bjrpass), write tape, or scan tape. 
A negative parameter follows in order to establish 
a definite break, since otherwise subsequent positive 
parameters would add into the parameter representing 
the previous job in successor's queue, thereby losing 
the identity of the jobs. 

After the job boundary, SC action depends on 
whether the mode of operation is bjrpass or over- 
lapped. If bypass, SC scans through the B cards 
until a non-B card is encountered, at which point 
scanning to a B card is resumed to identify the next 
job boundary. If overlapped, SC primes JCl, enters 
the SCRl mode and returns, doing no further scanning 
until a SCAN pseudo-op is received. JCl gives an 
SCRl command in order to get the actual address of 
the next card in the buffer. (This enables JCl to 
look at certain cards for control purposes while 
they are still in transit to their ultimate destination. ) 
JCl may continue to issue the SCRl command until 
SC has no more cards in its buffer, and the end 
return is given. However, receipt of more cards by 
SC while in the SCRl mode will cause it to again 
prime an entry into JCl. 

When JCl finds the first non-B card following a B 
card, or rejects a job, it issues the SCAN pseudo- 
op which causes SC to resume scanning until it finds 
another B card. As each SCRl command except the 
first is executed, the parameter 1, representing the 
previous card, is passed on to the successor program, 
and VX is updated. By retaining custody of the card 
last introduced to JCl, SC prevents that buffer area 
from being reused prematurely. It also takes into 
account the possibility that the disposition of such a 
card may be affected by its own contents. For 
example, if the card contained a BYPASS command, 
it would have to go to E rather than WT. 

The specific negative parameter passed on by SC 
at job boundary time depends on the mode of opera- 
tion in force. If offline, then no parameter is passed 
on to the scan tape program inasmuch as the job 
boundary condition has no phase 1 significance in 
this mode. In the online mode, SC passes the param- 
eter -VWEFT to the WT program, which will cause a 
tape mark to be written on the write tape when it is 
removed from the WT queue. The parameter, -VNOP, 
is passed to E in the bypass mode. The instruction 



at symbolic location VSC5 determines which action is 
to be taken. 

The Write Tape (WT) Program 

The WT program (Figure 64) writes card images onto 
the write tape in a blocked format, separating jobs 
with tape marks. The blocks within a job consist of 
17 cards each, except for the last block of a job, 
which may contain fewer cards. The number of jobs 
written on a tape is limited by a tape switch criterion. 
When this criterion is satisfied, an extra tape is 
written, making two consecutive tape marks, and 
the tape switch routine is entered. 

The EOP Entry: The WT end of operation routine, 
VWEOP, updates an in- job record count and then 
gives control to the subroutine, VEOP, which com- 
pletes the standard EOP procedure. The in-job 
record coimt is maintained in the WT table at VRCNT. 

The Queue Entry: The queue entry routine, VWQ, 
maintains the queue in a manner different from the 
VCOM subroutine due to the blocking function which 
WT performs. The subroutine VBLOC is used to 
control the entries. 

When the negative parameter, -VWEFT, repre- 
senting the end of a job, is given to WT, the contents 
of VRQB, if not zero, are placed into the queue and 
VRQB is set to zero. Then the negative parameter 
is inserted into the queue. Following this procedure 
of entering parameters, the parameters removed by 
VSETX will be a succession of, (1) an arbitrary 
number of 17's, (2) a single parameter between 1 
and 17 (inclusive); and (3) the negative parameter. 
After the incoming parameter has been entered into 
the queue as described, control is transferred to 
VACTX in order to actuate the write tape if it is not 
then active. 

The End of Job Routine: The end of job routine is 
entered when VSETX removes the negative param- 
eter, -VWEFT, from the queue in the normal course 
of WT processing. Accordingly, control goes to the 
subroutine VWEFT (Figure 64), which (1) sets VXl 
non-zero, making WT busy; (2) zeros the in-job 
record count, VRCNT; (3) alters the table of exits of 
the symbolic tape unit currently acting as the write 
tape so that control will be returned to the write tape 
mark EOP procedure, VWFEOP; and then, (4) issues 
the $WEF pseudo-op. 

Upon completion of the $WEF, control passes to 
VWFEOP (Figure 64) which deterniines, from the 
zero record count, that this is a job-terminating end 
of file. After updating the file count, VFCNT, the 
tape switch criteria are tested and in the usual case 
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Figure 63 - The Input Prt^ram - The Scanning Program 
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Figure 64 - The Input Program - The Write Tape Prc^am 



when none are satisfied, the table of exits is restored 
to normal and parameter flow resumed by going to 
VACT. 

The Tape Switch Criteria and Procedure: The tape 
switch procedure consists of writing a tape terminating 
file mark, and, upon completion of the operation, 
restoring the table of exits to normal and going to the 
WT tape switch routine, VWTTS. Since VXl is still 
non-zero, all write tape activity is blocked until 
restarted by an outside stimulus, namely the tape 
switch routine. 

The tape switch (TS) criteria are tested '(VWFEOP, 
Figure 64) immediately after each job-terminating 
file mark has been written. Whenever the TS proced- 
ure is used in these circumstances, the result will 
be two consecutive tape marks. 

The TS criteria for terminating a file are designed 
to meet two conflicting objectives: first, to start write 
tape rewinding sufficiently in advance of exhausting 
the read tape program to maintain an uninterrupted 
supply of data, and second, to put sufficient informa- 
tion on each write tape so that rewinding time does 
not become a large negative factor in overall per- 
formance. The first criterion is that a tape is not 
terminated until a specified minimum number of jobs 
(VMNJB) have been written on it, and the second is 
that it is always terminated when a specified maxi- 
mum number of jobs (VMXJB) have been written. 
Between these extremes, in addition, the tape is 
terminated after the read tape has VFCD or fewer 
jobs left to read. VFCD is a parameter defined by 
a SYN card. At present, VFCD is 2, VMXJB con- 
tains 10, and VMNJB contains 5. 

The Read Tape (RT) Program 

RT reads cards from tape into phase 4 buffers, 
identifying the job boundaries to the request proc- 
essor (Q) as they occur. It also indicates when it 
has read all but VFCD jobs on a tape (part of the WT 
tape switch criteria). The RT routine consists of a 
queue entry, VRQ; the I-O fixup routines, VREOP and 
VREE; and the I-O actuation routine, VRTIO. The 
queue entry is identical to that of WT since block 
recording must correspond to the blocked format of 
the write or scan tape. 

EOP and I-O Actuation: The EOP procedure, per- 
formed by the VEOP subroutine, is standard. The 
actuation routine, VRTIO, derives the next control 
word, updates the record count (RCNT), and issues 
the $RD pseudo-op. The control word is obtained by 
refilling the present control word, R, VCWR(VU), 
which in turn alternately selects one of the two con- 
trol words referring to the top and bottom halves of 



the phase 4 buffer. It would seem that the control 
words bear no relation to the VX parameter, but 
actually the parameter flow is controlled so that 
only positive parameters having the value 17 are 
inserted in the RT queue. Since this is so, the VMD 
subroutine need not be used. 

Since RT control words have the multiple bit on, 
the reading of short records is terminated with an 
EE interrupt caused by detecting the tape mark which 
follows short records. Thus an EOP termination 
occurs only when a full block (17 cards) has been 
read. 



The EE Fixup: The EE fixup (VREE, Figure 65) will 
be entered N+1 times if there are N jobs on the read 
tape. There are N entries corresponding to tape 
marks terminating jobs and the N+lth entry for the 
tape mark terminating the tape. The RT program 
distinguishes the last entry by testing whether any 
cards were read subsequent to the last EE interrupt. 

VREE first decrements a count in VFCNX of the 
RT table, and when the count reaches zero, sets up 
VTSQ, which influences when WT starts tape switch. 
Initially, VFCNX is set to N-VICD for each new read 
tape received. 

To establish the significance of the tape mark the 
VTEE subroutine is entered which starts by making 
two tests: 

1. Was this the first read instruction in a new job? 

2. Were there no cards read by this instruction? 
Affirmative answers to both mean the end of tape 

has been reached, and the procedure discussed in 
the next section is followed. Otherwise, VTEE pro- 
ceeds with bookkeeping functions: 

1 . It updates the VX parameter to the next half 
buffer. 

2. It sets VRCNT to zero and updates the file 
count, VFCNT. 

3. It enters VACT, in-an attempt to reactuate the 
tape. 

4. It passes a parameter to the successor pro- 
gram giving the number of cards successfully read. 

5. It returns to the calling program (in this case 
VREE), which passes a negative parameter, VQEND, 
signifying job end. This is followed by a positive 
parameter which is the number of cards not read 
because of the tape mark. This completes the job 
end procedure within RT. 

After the procedure above the queue of the card 
request program (overlapped) would contain K, 
-VQEND, 17-K if the number of cards read success- 
fully was K. The parameter K will become an active 
parameter in Q making K cards available for trans- 
mission. When this is exhausted, -VQEND will be 
reinoTO-^. from the queue and control will go to QEND, 
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Figure 65 - The Input Prc^ram - Tape EE Fixup 



which will remove the next parameter, 17-K from 
the queue and pass it back to RT at the same time 
updating VX(Q). Thus the parametric representation 
of one entire buffer half will have passed through Q in 
proper sequence though the parameter division pro- 
vides that only a specified portion will be made avail- 
able for transmission. Finally, VQEND returns to 
the program which called VSETX with a negative 
parameter, which is recognized by the request proc- 
essor as a job boundary. 



The Tape End Procedure: The tape end procedure, 
culminating in tape switch, is initiated from the 
VTEE routine when the tape switch criteria are met. 
The routine, VSTTSX, simply sends to the successor 
program a negative parameter which it finds in the 
VTS slot of the program table. This parameter, 
-VRTTS, causes an entry to VRTTS to occur only 
after the last job read from the read tape has been 
completed with an SEJSCN command given to the 
input program. 

The Scan Tape (ST) Program 

The scan tape program is virtually identical to the 
read tape program. This is because both perform 
an almost identical function, namely; (1) to supply a 
buffer with card images read from a tape of standard 
format; (2) pass on parameters representing the 
buffer areas to a successor program, identifying to 
the successor the occurrence of each job boundary as 
it is detected; (3) to recognize the logical end of tape; 
and (4) initiate the tape switch procedure. Whatever 
differences exist are absorbed in the tables, such as 
operating buffer (VCWR), tape switch routine, sym- 
bolic I-O unit (VSU) and successor program (VNX). 

The job end procedure, however, differs in two 
points: 

1. The count down of jobs and communication to 
the WT for tape switch purposes is omitted. 

2. Instead of VQEND, the negative parameter, 
- VSCEND, is used for parameter partitioning of 
incompletely read buffer areas. 

The second point is necessary because of a funda- 
mental difference in the successor programs, Q and 
SC. The VSCEND, after essentially performing the 
functions of VQEND, must return to VSETX to get 
the next parameter from the queue of SC. That is, 
after adjusting SC for the incompletely read buffer, 
VSCEND resumes parameter flow through SC as if it 
never occurred. This is possible because SC does 
not rely on the tape format for determing job bound- 
aries but continues to use the non-B, B break in 
cards, as in the other modes. In the offline mode, 



SC is adjusted so as not to feed any negative param- 
eters to its successor at job boundaries, since ST, 
in effect, already knows of job boundaries. 

The Request Processors (E and Q) 

The card request processors provide cards under 
control of externally generated requests, with the 
process governed by the parameter flow mechanism. 
The input program is entered at VSCR when $SCR or 
SSCR4 is requested (Figure 66). 

The queue entry routines perform the standard 
functions except that the actuation phase consists 
simply of placing a non-zero parameter into VXl. 
That amount of cards is then transmitted under the 
control of and to memory areas designated by one or 
more externally generated requests. The equivalent 
of EOP is not so clear. Recall that normal EOP 
procedure consists of passing on the contents of VXl, 
updating VX, and reactuating. The request proc- 
essors perform the first two functions on a piece- 
meal basis depending on the occurrence of requests. 
In other words, for every transmission, VXl is 
decremented and VX incremented by the amount of 
cards just transmitted, and a parameter representing 
this amount is forwarded to the successor program. 
However, when VXl is reduced to zero, reactuation 
occurs, consisting of obtaining the next parameter 
from the queue and putting it in VXl. 

The Request Processor Subroutine: The work of 
processing requests is done by the subroutine VREQ 
(Figure 66) . Externally, the routine has the following 
characteristics : 

1. It is entered with the following quantities: 

a. The program table origin (E or Q) in index 
register VU and location VREQXT. 

b. The first word address (FWA) and number 
of cards (VNREQ) of the request in the SCR- 
SCR4 tentacle table, WSCR. 

c. The location of the M slot of the originating 
calling sequence in $0. 

2. When control is returned: 

a. The number of cards requested has been 
transmitted unless the number overlaps the 
end of job file, in which case only the 
remainder of the file was transmitted. 

b. $0 contains the location of the normal return 
or end return in the originating calling 
sequence, according to whether or not the 
requested number of cards was delivered. 

c. If the request was terminated due to file 
end, the number of cards actually trans- 
mitted is placed in the calling sequence at 
the M slot. 
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Figure 66 - The Input Program - Card Request Processors 



In its internal operation, VREQ first tests VXl to 
see if it is greater than zero. If it is not, control 
goes to VREQ2 for further tests described later. If 
VXl is greater than zero, the VMD routine is entered 
to construct the control words for transmission, the 
number of cards transmitted being governed by the 
lesser of VXl or VNREQ. After transmission, VXl 
and VNREQ are decremented by the lesser amount. 
The VNREQ residue is tested for zero, meaning the 
request processing is complete, and if it is, VREQ 
returns control with $0 properly adjusted. On the way 
back, the parameter representing the last trans- 
mission is passed on to the successor. If the request 
processing is not complete, control goes to VREQIO 
to get, if possible, another positive parameter from 
the queue. VREQIO first forwards to the successor 
a parameter representing the number of cards just 
transmitted, and then goes to VSETX. The value 
returned from the queue by VSETX is stored in VXl. 
If it is non-zero, the above process is repeated. If 
it is zero, the action depends on whether the original 
request was a SCR or SCR4. If SCR4, $0 is adjusted 
for an end return and VREQ returns control. If SCR, 
the $RIO pseudo-op is given to allow interrupts from 
the read tape or card reader. The first parameter 
which is passed on to Q or E as a result of an inter- 
rupt will be placed into VXl by the normal queue 
entry function since VXl is now zero. Consequently, 
after giving $RIO, a loop is started which tests VXl 
repeatedly until a non-zero condition is identified. 
$SIO is then issued to protect the request processor 
from uncontrolled interference from future interrupts, 
and the entire procedure is repeated from the begin- 
ning. 

If, back at the beginning, VXl was not greater than 
zero, control was sent to VREQ2 which first tests 
whether VXl is zero, in which case VREQIO is 
entered to obtain another parameter. Should VXl be 
negative, the request is up against the job end and 
the end return procedure is applied. This consists of 
deriving the number of cards actually delivered by 
subtracting the residual from the original request, 
storing the result in the M slot of the calling sequence^ 
and adjusting $0. However, VXl itself remains 
unchanged in case it is negative, to act as a block to 
all future requests. 

The request routine includes logic to simulate an 
SEJSCN operation when a one card file is encountered 
on a read tape. This situation may be originated by 
an offline input program, and appears to be a one 
card job consisting of a command card. Unless the 
situation is recognized and SEJSCN performed, the 
system would hang up in phase 4 in an SSCR4 - end 
return sequence. 



The SEJSCN Command: SEJSCN is an input command 
to recognize the next SCR4 request as a request for 
the first card of the next job. The first stage in the 
execution of this command, in either overlapped 
(VOEOJ) or bypass (VBEOJ) mode, is done by the 
VSEOJ subroutine (Figure 67). This routine looks 
for a negative parameter, beginning at VXl and pro- 
ceeding into the queue, removing successive param- 
eters by means of VSETX. It continues until either 
a negative parameter is returned by VSETX or the 
end of the queue is reached, at which time the sum 
total of the positive parameters passed over in the 
search is passed on to the successor and VX is ad- 
justed to preserve phase. Control returns from 
VSEOJ with either the negative parameter or zero, if 
none was found. 

When VSEOJ returns control, it tells whether or 
not the job end is in the buffer, and it has swept out 
all parameters not after such job end. If the job end 
was in the buffer, the command SEJSCN has been 
completed, since the removal of the negative param- 
eter unblocks the VREQ routine. If the job end was 
not in the buffer, further action is required to set up 
a mechanism to skip over the remainder of the job 
at the source, either the read tape or the card reader. 

To consider the bypass case first (E), the queue 
entry routine is modified so that rather than inserting 
parameters in the queue, it tests them for equality 
with -VNOP. If the incoming parameter is positive 
it forwards it to CR after adjusting VX. By shunting 
all of the parameters related to the defunct job back 
to CR, a continuous scan is set up, to terminate only 
with the end of job signalled by the parameter, 
-VNOP. When this occurs, the interface is restored 
to its normal state and the execution of the SEJSCN 
command is complete. 

In the overlapped situation (Q), the remainder of 
the file is skipped, including the file mark, and nor- 
mal reading resumed by RT. At this time the read 
tape must be busy with a $RD instruction because 
having just evacuated the queue of Q with VSEOJ, RT 
has a full complement of 34 card images and must 
certainly be reading into 17 of them. The skipping 
procedure consists first of changing the table of exits 
mechanism so that control comes to one of two special 
fixups, VSREO and VSRE, when the $RD is termi- 
nated. If an EE occurs, which is ultimately desired, 
VSRE is entered. VSRE restores the normal table 
of exits configuration and restarts the same $RD 
instruction but this time the record coming in will be 
the first of the next job, and the normal fixups, just 
restored, will forward it to the request processor. 
If an EOP occurs, a $SPFL command is issued by 
VSREO and the resulting EE interrupt will cause 
VSRE to be entered later. 
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Figure 67 - The Biput Program - EOJ Scan 



In the above situations, while a protracted file 
skipping operation is in progress, VXl remains zero. 
Should a request for cards occur, it will hang up in 
a loop with JC4 via the end return in the SCR4 calling 
sequence, since SCR4 gets an end return if there are 
no cards immediately available. 

The Tape Switch Program 

The tape switch program consists of two routines, 
which resemble the functional programs in their 
overall characteristics. One, VTSA, accepts write 
tapes and scan tapes from phase 1 operations and 
feeds them, in sequence, to phase 4. The other, 
VTSB, takes the units given up by phase 4 and makes 
them available for phase 1 use. 

The two TS routines are patterned around a param- 
eter flow mechanism similar to that of the functional 
programs, in which the parameters are the lOD 
numbers of the tape units used by the input program. 
The routines each have a table of similar format to 
that of the functional programs, as shown below. 





Table 




Symbol 


Position 


Content 


VX 





Unused 


VXl 


■ .32 


Active parameter 


VX2S 


1. 


Queue maintenance parameter 


VX2R 


2. 


Queue maintenance parameter 


VOP 


3. 


Bit specifies REW or UNLD 


VSQNC 


3.1 


Bit sequence critical 


VDS 


3.32 


Program destination of tape 




4. 


Constant 


VNX 


5. 


Successor program 


VIO 


5.32 


Tape initiation routine 



The first four entries are concerned with the 
parameter flow mechanism which is similar to that 
of the functional programs with the following differ- 
ences: 

1. VX, though "updated" by the VACT subroutine 
has no significance and is never used. 

2. VXl will contain the lOD number of the tape 
currently active in the respective phase. 

3. The identity of incoming positive parameters 

is maintained in the queue by placing them in consec- 
utive slots rather than accumulating them in the same 
slot. Therefore, VCOM is not used in the TS routines. 

The VOP bit specifies whether the proper operation 
to terminate the tape is $REW or $UNLD. For phase 
1 (TSA) this is always indicating $REW, whereas 
the setting in VTSB depends on which overlapped 
mode is in effect or, if the bypass mode is current, 
was last in effect. 

The VSQNC bit specifies whether the sequence in 
which tapes are released from a phase determines 



the sequence in which they are made available to the 
other phase. In VTSA, this bit is always 1, indicating 
the critical sequence case which arises because of 
the necessity of maintaining phase integrity with the 
tables constructed during the phase 1 scan. Since 
the released phase 4 tapes carry no useful informa- 
tion, their sequence of return to phase 1 is not sig- 
nificant. Another word, VTQ is also used in the 
mechanism for preserving sequence in transferring 
tapes from phase 1 to phase 4. 

The VDS slot contains the address of the table of 
the functional program which is the ultimate destina- 
tion of tapes being retired from a particular phase. 
For VTSA this is always RT whereas for VTSB this 
may be ST or WT depending on the overlapped mode. 
As each lOD number is forwarded to its successor, 
the intended destination, derived from the VDS slot, 
is assigned to the unit. 

VNX contains a branch to the queue entry routine 
of the successor, the entry points of which are 
VTSAQ and VTSBQ for VTSA and VTSB respectively. 
VIO contains a branch to a routine, VTA, which 
initiates an extended operation during which VXl is 
non-zero, indicating the TS routine is busy. The 
operation referred to is that of attachment of a specif- 
ic unit to one of the two phases. This operation 
continues while the phase processes the tape and is 
terminated when the phase transfers contr.ol to one 
of the tape switch initiation routines . 

The action of tape attachment consists mainly of 
placing the lOD number, in the VSU slot in the tape 
program table and branching to the VSTR slot in that 
table. VSTR contains a branch to a small routine 
which restarts the tape program, which had blocked 
itself pending assignment of another unit. 

The Tape Switch Initiation Routines 

The TS initiation routines are the routines which 
initiate the action of transferring a tape to the other 
phase. They are some what analogous to the table 
of exits for the functional programs through which 
control returns at the end of an operation, the opera- 
tion being continued attachment of a tape unit to a 
tape functional program. The three routines and the 
tape programs they are related to are: VWTTS(WT), 
VSTTS(ST), and VRTTS(RT). See Figure 68. 

All three routines load index register VU with the 
origin of the TS table appropriate to the phase (VTSB 
for phase 4, VTSA for phase 1) and call the VTOP 
routine, which is the analogue of the VEOP routine 
for functional programs. VWTTS and VSTTS also 
provide VTOP with the count used by RT in deciding 
when to request tape switch from phase 1. 

VRTTS and VSTTS, which are called as the result 
of removing the negative parameter from the queue 
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of Q or SC, return a zero parameter to Q or SC after 
calling VTOP. Thus, Q and SC are starved and their 
operation ceases. Meanwhile, RT and ST are blocked 
by the parameter 17 in VXl which represents the 
$RD that could not be completed because the end of 
tape was reached. When a new tape is assigned, the 
processing is resumed simply by reissuing this $RD. 

Operation in the WT program would be inhibited by 
some negative parameter in VXl, usually WEFT, and 
when the time comes to resume, this would be done 
by using the VACT subroutine. 

Once a TS initiation routine has called VTOP, the 
tape switch routine proceeds independently of the 
functional programs and their tables until it is time 
to actually attach a tape to a tape program. 

The Tape Switch Routines 

The TS routines (Figure 69) proper are a single set of 
routines which serve both VTSA and VTSB. There- 
fore, rather than discuss VTSA and VTSB separately, 
the routines of which they are both composed will be 
discussed. 

As the tape units proceed through the successive 
stages of tape switch certain information must be 
carried over between stages. For this purpose a 
single full word is set aside for each lOD number. 
These are arranged in a symbolic unit reference 
table (VSURT), so that they may be directly accessed 
with the lOD number. For the tape lOD's the format 
of an entry is as follows: 

Format 



XW, VF, CF, RF, Flags 



Content 



Symbol Position 



VTPQ VF 



Use 



VFCNT CF 



RF 



RF 



Used for maintaining sequence 
information for VTSA. 
Contains file count for use 
byRT. 

Contains TS routine table 
origin while a $REW or a 
$UNLD is in progress. 
Contains the destination of 
this unit after $REW or 
$UNLD is completed (i. e. , 
RT, WT, or ST.) 
Flag Bit . 25 Distinguishes $REW and 
$UNLD. 
VRDY Flag Bit .26 Used to indicate unit ready. 

The two main routines in TS are VTOP, which 
initiates a $REW or $UNLD; and VTDSP, which is 
entered when a channel signal interrupt is released. 



VTSO 



VDSO 



VOPB 



The Tape Operation Routine (VTOP): The operation 
of VTOP is governed by the appropriate table, VTSA 
or VTSB, the origin of which is provided in index 
register VU by the TS initiating routine which called 
VTOP. The lOD reference number is obtained from 
VXl (VTSX)* locating an entry in VSURT. The VOP 
(VTSX) bit determines whether a $REW or $UNLD 
operation is given and this setting is placed in VOPB 
(VSURT) where it is the basis of the operation to be 
performed. The VSQNC (VTSX) bit is tested and if 1, 
information relating to the order of rewinding must 
be preserved. This is done by using a linking 
mechanism in which each VSURT entry involved points 
to the next VSURT entry in the queue. The VTPQ 
portion of VSURT is used for this purpose and the 
relative location of the queue is in VTQ(VTSA). 

Next, the VTMV subroutine is entered, which sets 
the TS origin in VU into VTSO (VSURT) , sets bit 
VRDY (VSURT) to zero indicating unit not ready, and 
on the basis of VOPB (VSURT) issues either a $REW 
or $UNLD operation. 

Control now returns to VTOP which directly 
branches to VACT in order to attach a new unit if one 
is available. The mechanism involved in this action 
is similar to that in which the VEOP routine, as one 
of its last acts, branches to VACT. VACT ends by 
branching to VIO (VTSX) if it finds another parameter 
in the queue, and since VIO (VTSX) contains B, VTA, 
the tape attachment procedure is initiated. 

The VTDSP Routine: VTDSP (Figure 69) is entered 
from the CS slot in the table of exits with the lOD 
number set into index register VTS. First the VRDY 
(VSURT) bit is set to 1 and then using the VTSO entry 
in VSURT the applicable TS table is located. The 
VDSO (VSURT) slot is set equal to VDS (VTSX) so that 
the VSURT contains now the ultimate destination pro- 
gram of the unit. It is significant to the transition 
routine VONLID that the destination is set at unit 
ready time (CS) rather than at unready time. 

The VSQNC (VTSX) bit is then tested to see whether 
sequence of actuation is to have a bearing on the 
sequencing of forwarding to the other TS routine. 
Should it not, then this is the phase 4 to phase 1 inter- 
face and a special compatibility test, VTDPl, must 
be made before forwarding can occur. Otherwise, 
the linked queue of rewinding tapes is scanned, using 
VTQ (VTSA) to locate the front of the queue, until a 
unit ready bit (VRDY) is found to be zero or the end 
of the queue is reached. As the queue is scanned all 
the tapes with VRDY (VSURT) equal to 1 are removed 
from the queue and forwarded to the successor 
through the standard interface. 

* The VTSX indicates the preceding symbol refers 
to a table entry for VTSA or VTSB. 
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Figure 69 - The Input Program - Tape Switch Routines 



VTDPl makes a test to see if tapes about to be 
forwarded to the phase 1 program, ST, have come 
ready as the result of an $UNLD and not a $REW. 
Obviously ST does not want to scan an old ready tape, 
which could occur if an OFFLN transition is received 
after a tape is started rewinding. Should the test 
fail, the VOPB (VSURT) bit is set equal to 1 and the 
VTMV routine will be entered causing the $UNLD 
command to be issued. Tapes which pass compati- 
bility are forwarded in the usual way. 

VTA Routine: The tape attachment routine (Figure 
69) is entered through the VIO slot in the TS tables 
which in turn is entered from VACT. Attaching a 
unit is very simple: 

1. Obtain the destination program from the VDSO 
slot in VSURT. 

2. Store the lOD number in the VSU slot in the 
table of the destination program. 

3. Store the program table origin above the table 
of exits where it will be used to control the destina- 
tion of interrupt. (Refer to the code to see how this 
works.) 

4. Set VRCNT and VFCNT equal to zero. 

5. Branch to the VSTR slot in the program table 
to restart the program. 

The Transition Routines 



The six transition routines are initially entered from 
the input command dispatcher when the appropriate 
pseudo-op is given by the command package. If the 
requested transition cannot be immediately effected, 
controls are set for subsequent re-entry when the 
command can be effected. 
Online from Offline — VONLIN 

The VONLIN routine (Figure 70) is entered when the 
ONLINE command is given through the console. The 
routine occurs at some time after the command is 
given because the implementation of the command 
must await a convenient break point in the offline 
mode operation. The time the command occurs is 
significant because all tapes subsequently readied at 
TSB will be online mode tapes. This is accomplished 
by changing VDS (VTSB) to WT immediately. Also, 
a negative parameter, VCCR (commence card reading 
is put into the TSA queue. 

After this point, tapes becoming ready at TSB will 
be given WT destinations and be forwarded to the 
queue where they will fall in behind VCCR in the TSA 
queue. When VTSA picks up -VCCR the online mode 
is actually started. This consists of 3 steps: 

1. Perform bookkeeping which connects CR to SC 
to WT. The write tape VX is set equal to the card 



reader VX because an intervening bypass mode may 
have destroyed the phase equality of these two pro- 
grams. 

2. Restart the card reader by branching to a por- 
tion of the CR channel signal routine (so that the unit 
ready bit of the control word is not tested). 

3. Re-enter VSETX to attempt to attach a tape 
through VTSA to WT. Phase 4 operation is not 
affected at all by this transition. 

Online from Bypass — VONLIB 

The VONLIB routine (Figure 70) is entered as the 
result of an ONLINE command card having been 
received in response to an SCR4 command in the by- 
pass mode. The VONLIB routine reactivates phase 
4 and reroutes the cards following to WT, initiating 
phase 1. By the simple act of letting VREQ process 
subsequent requests from the Q tables, the phase 4 
operation is reinstated. The rest of the transition is 
concerned with getting the phase 1 operation under- 
way. 

The SC routine is connected to WT, SC is modified 
for online operation, and the phase of WT is set equal 
to that of CR. At the time the VONLIB routine is 
entered, the E program most likely has some buffer 
area assigned to it, since phase 1 must obviously 
proceed on the assumption of no transition until the 
command card is actually delivered by the request 
processor to the package which recognizes it. It is 
therefore necessary to recover the remaining buffer 
area assigned to E and return it to SC for rescanning 
in the online mode. The recovery is accomplished by 
the VSWEEP subroutine (Figure 70) which repeatedly 
applies VSETX until a zero parameter is returned, 
totaling up all positive parameters returned and 
ignoring negative parameters. The total is returned 
to VONLIB which forwards it to SC and, most 
importantly, backs up to the SC phase parameter, 
VTX, to compensate. 

The VOP (VTSB) bit is next tested to see if the 
previous overlapped command was online or offline. 
Recall that VOP (VTSB) determines whether phase 4 
was unloading or rewinding tapes and that in the online 
mode, phase 4 would be rewinding tapes. If the 
previous overlapped mode was online, then the 
transition is complete because the tape switch 
mechanism was unaltered by the VBYPAN transition 
and is free to supply WT with a tape if, indeed, it 
has not already done so. 

If the previous overlapped mode was different, that 
is, offline, the transition is deemed compound and 
further action is required. The VBYPAF routine has 
left VTSA blocked and therefore some tapes may be 
queued up in ST destinations. Therefore, the VTSA 
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Figure 70 - The Input Program - Transition to Online 
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queue is scanned and the VDSO (VSURT) entry is set 
to WT for every lOD number found in the TSA queue. 
The scanning operation does not affect the TSA queue. 
Then the VAC T subroutine is applied to VTSA to 
unblock it and resume parameter flow. This com- 
pletes the compound transition. However, there is 
one additional step, namely, VACTX is used in order 
to start the card reader. This step is normally 
redundant since in the bypass mode which had just 
been operating, the card reader is active and nothing 
has been done in the VONLIB transition to upset this. 
But this step is included for the benefit of the initial 
starting procedure, a subject covered in a later 
section. 

Bypass from Online — VBYPAN 

The VBYPAN routine (Figure 71) receives control 
from the command package when a BYPASS command 
card is detected by JCl. The transition entails three 
steps: 

1 . Forward a negative parameter to WT to termi- 
nate the write tape. 

2 . Modify SC for bypass operation, connect it to 
E, and resume scanning as if for a SCAN command. 

3. Direct the attention of the VREQ routine to the 
E table instead of the Q table. 

The parameter -VBREW is forwarded to WT. In 
addition to starting the tape termination procedure, 
VBREW sets a bit, VBYON to 1. This setting of 
VBYON will cause the SCR4 routine to modify VREQ 
to process requests from E when the next SCR4 
command is received. Thus, step 3 can only occur 
after all of VBFl has been written onto tape. 

After -VBREW has been forwarded, step 2 is per- 
formed by the VSCBY routine. Then the BYPASS 
linkage is complete and ready to process but may not 
do so yet because VBFl may still have some cards 
which are being written or are waiting to be written 
on tape. Notice that if requests were processed 
from E, it is possible that CR would read over cards 
not completely written on tape or, to put it another 
way, E could act as a "short circuit", recycling 
parameters back to CR before WT could send its 
parameters, which logically precede those of E, back 
to CR. The interlock mentioned above prevents this. 
Once the VBYON bit has been set, the next SCR4 will 
set VREQ so that it processes requests under control 
of the E tables . 

Except for this, the phase 4 operation is unaffected; 
parameters will line up at the Q program, which is 
now dormant. In this situation it is very simple to 
resume phase 4 operation later by directing the VREQ 
routine to Q. 



The tape switch mechanism operates normally. It 
is possible for the read tape to switch over and attach 
to WT, but it will not actuate because by this time WT 
will be devoid of assigned buffer area. In this situa- 
tion, the write tape just terminated would attach to 
RT, fill up VBF2 and then stop because of the block- 
age of the Q program. Observe that in this situation 
the resumption of the online mode would be rather 
straightforward. 

Bypass from Offline — VBYPAF 

Like the ONLINE command, the BYPASS command 
is received through the console and command packages. 
The time it occurs is significant in that tapes coming 
ready at VTSA will not be scanned; their ultimate 
disposition depends on what overlapped mode is 
resumed later. Tapes already in line at TSA are 
scanned in order to free VBFl for BYPASS operation. 

Since the bypass mode may not be instated until 
VBFl is free, no action is taken upon entering the 
VBYPAF routine (Figure 71) except to insert the 
negative parameter, -VCBR, into the VTSA queue. 
VCBR, being entered only after all tapes in the VTSA 
queue have been scanned, then proceeds with the 
transition. 

VCBR (Figure 71) first sets VXl (VTSA) non-zero 
thereby blocking any tapes coming ready at VTSA 
from attaching to ST. Such tapes will merely line 
up in the VTSA queue where they will be available 
when an overlapped mode is resumed. The phase of 
SC is set equal to that of CR by restoring the phase 
parameter which existed when in the last previous 
card reader mode. The CR phase will have been 
unaffected by the offline mode. Concurrently, the 
present phase of SC is saved for later use in restoring 
the SC, ST phase relation whenever the offline mode 
is restored. 

Next, SC is connected to E, SC is modified for 
bypass operation, and the phase of E is set equal to 
that of SC. The sequence is the same as for the 
VBYPAN routine and the subroutine VSCBY does this 
for both transitions. In addition, for the VBYPAF 
routine, SC must be initialized to scan through B 
cards since it is left scanning for a B card by the 
offline scanning operation just completed. 

Finally, the VBYON bit is set to 1 and control goes 
to the VRDCSX routine. The VRDCSX routine starts 
up the card reader just as it did for the ONLINE 
command and the setting of VBYON will interrupt 
phase 4 and complete the transition to bypass just as 
it did for VBYPAN. 

The tape switch mechanism is left in almost the 
same state as in the VBYPAN command, except that 
tape attachment is blocked at VTSA. If a tape attach- 
ment to ST were allowed to occur, ST would read 
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Figure 71 - The Input Program - Transition to Bypass 



into VBFl because, unlike WT, ST would have a full 
complement of buffer area assigned to it. When a 
mode of operation is suspended, it is generally true 
that the buffer parameters will collect at the functional 
program which is the source of data. Thus, in the 
online mode the CR is the source of data, and the 
parameters collect here when CR is blocked out by 
an out of material condition. Likewise, in the offline 
mode, the parameters collect at the data source, 
ST, when ST is blocked by not having a tape to read. 
Since the TS switch mechanism would normally pro- 
vide such a tape, the mechanism must be prevented 
from doing so. 

The philosophy of the BYPASS command is that it 
is primarily a temporary interruption of the existing 
overlapped mode. Therefore, the transition routines 
to bypass alter the prior overlapped mechanism as 
little as possible. The compound case, resumption 
of overlapped operation in a mode different from the 
previous overlapped mode is handled by the two 
resumption commands on an exception basis. 

Offline from Online — VOFFLN 



The VOFFLN routine (Figure 72) is entered when JCl 
identifies an OFFLINE command card. The VOFFLN 
routine first determines whether the OFFLINE card 
is the last one of the input file from the card reader. 
If it is not, it gives a reject return to the command 
package which causes the OFFLINE command to be 
ignored and processing of the input file continues in 
the online mode. Otherwise, VOFFLN alters the 
card reader CS fixup to ignore CS thereby preventing 
the card reader's possibly reading into the phase 1 
buffer. 

In order to effect the transition to offline the 
following steps must be taken: 

1. Modify VTSB so that old phase 4 tapes are 
unloaded and so that tapes coming ready at VTSB are 
given an ST destination. 

2. Modify VSC and connect it up with ST. 
Changing the destination of old read tapes can only 

be done when it is definite that all of WT assigned 
buffer area has been written on tape. A negative 
parameter given to WT at this time will be picked up 
only after all prior assigned buffer area has been 
processed. Therefore, the parameter , -VFREW, 
is forwarded to WT. 

When -VFREW is removed from WT queue, 
VFREW proceeds with the offline transition. The 
phase of SC is set equal to that of ST by simply 
restoring to SC whatever position pointer it last had 
in the offline mode. ST, used only in the offline 
mode, will still have the same position. At the same 
time, the current position pointer of SC is saved so 



that it may be used in restoring the phase identity of 
SC and CR when leaving the offline mode (a SWAPI 
instruction accomplished both functions) . SC is then 
modified for offline operation: specifically, it will 
not forward the parameter, -VWEFT, at job bound- 
aries to ST. At this point, the phase 1 operation is 
set up and ready to operate; however, it is not started 
because provision for supplying tapes must first be 
made. 

In order that future tapes coming ready from VTSB 
arrive at ST, the VDS (VTSB) slot must be set to ST. 
Furthermore, expended read tapes should be unloaded 
in the offline mode, not rewound, and so VOP (VTSB) 
is set to 1. However, it is possible that some tapes 
have already come ready and been put in the VTSA 
queue with WT destinations. The subroutine VMTTSA 
removes these tapes from the queue and recycles 
them through VTMV to be unloaded, whence they will 
come ready with ST destinations because of the new 
setting of VDS (VTSB). When the first tape does 
come ready it will initiate phase 1 operations through 
the normal tape switch mechanism, the transition 
procedure being completed by then. 

VFREQ must do one more thing, depending on how 
it was removed from the WT queue; whether in the 
normal continuation of WT processing or in reinitiating 
WT processing upon receipt of a new tape from tape 
switch. When -VFREW is delivered to WT by the 
VOFFLN routine, WT may terminate the tape just 
prior to picking up -VFREW from its queue. In this 
case parameter flow would halt at WT until a new 
tape is delivered to WT, at which time VFREW would 
be picked up. On the other hand, VFREW may be 
picked up in normal continuation just after the VWEFT 
procedure has been completed, and VFREW would 
use the write tape termination procedure to send the 
completed write tape to phase 4. VFREW can dis- 
tinguish between the two cases by testing the file and 
record counts, both of which would be zero in the 
tape attachment case. In this case VFREW passes 
back the tape just being attached as it did for the 
tapes found in the VTSA queue. In normal continua- 
tion, VFREW goes to the WT tape termination pro- 
cedure. 

This completes the OFFLINE transition. It is well 
at this point to review the status of the old phase 1 
configuration. The WT program is now in a position 
to receive a new tape, although it will not get any 
because VDS (VTSB) is set to ST. Also, WT is in a 
position to receive cards from SC, but will not get 
any because SC is now feeding ST. All of the phase 
1 buffer parameters have by this time been moved to 
CR where they are held up because an out of material 
condition exists at CR. This will not be inadvertantly 
removed by readying the card reader, since the CS 
fixup has been altered. 
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Figure 72 - The Input Program - Transition to Offline 



Offline from Bypass — VOFFLB 

The VOFFLB routine (Figure 72) is entered under 
circumstances similar to the VONLIB transition. 
The card originating the command musfrbe the last 
card in the file. This condition is first tested by 
VOFFLB and if it is not satisfied an "end" return is 
given to the command package and the remainder of 
the file is processed in the bypass mode. Otherwise, 
the future inactivity of the card reader is ensured by 
altering the CS fixup to ignore channel signals. 

The phase 4 operation is resumed immediately by 
altering VREQ so that is thereafter processes requests 
from the Q tables and VBF2. The SC is modified for 
offline mode operation, connected with ST, and the 
SC-ST phase integrity is restored just as in the 
VOFFLN routine. At this point phase 1 operation is 
ready to be started, but the method of starting depends 
on whether this transition is simple or compound. 

If simple, then the tape switch mechanism is 
already set up as for offline operation, and VTSA, 
which was blocked by the VBYPAF routine, need 
only be restarted by using the VACT subroutine with 
the VTSA queue. 

If the previous overlapped mode were online, there 
may be a tape attached to WT and also some tapes in 
the VTSA queue with WT destinations. Using the sub- 
routine VMTTSA will remove the tapes in the VTSA 
queue and put them through an unload cycle, just as 
for the VOFFLN routine. K a tape is attached to WT 
as indicated by a zero record and file count, it is 
removed by the VRJTP routine (Figure 73) , which is 
that part of the VFREW routine performing this 
function for both the VOFFLB and the VOFFLN 
routines. Just prior to cleaning out VTSA, VOP 
(VTSB) and VDS (VTSB) were set for offline opera- 
tion, so tapes coming ready at VTSB will be forwarded 
to the proper destination, ST. The first such tape 
will start phase 1 automatically, thus completing this 
transition. 

The Input Command Dispatcher 

All input commands except SSCR and SSCR4 enter 
through a single tentacle table, VSKM. This specifies 
as its entry point the command dispatcher routine, 
VSSKOM, which dispatches control to the appropriate 



command routine. The first parameter in the SKOM 
calling sequence generating the command specifies 
the command desired. This parameter is placed in 
the VSKM tentacle where it is available to the 
VSSKOM routine. 

VSSKOM uses this parameter in the sense of a 
relative location within one of two branch tables 
which contains branches to the appropriate routines. 
The particular branch table used is set externally to 
VSSKOM by some of the transition routines. The 
command routines addressed by the tables versus 
the relative location parameters used to address the 
particular entry are as tabulated below: 
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The transition routines with an asterisk set the 
SSKOM routine to use the other branch table. The 
various routines return to the command dispatcher 
with the return set as end or normal. The command 
dispatcher stores the return address in the tentacle 
table and issues $RET. 

The Rewind Command 

The system rewind command allows the operator to 
control termination of the write tapes in the online 
mode of operation. The REWIND card is placed in 
the input file just before the job which the operator 
wants to place on a new write tape. 

Control is given to VSREW for a rewind command 
as soon as the card is recognized by JCl. Since con- 
trol is received in phase witli SC but implies action 
in a subsequent program (WT), a negative parameter, 
-VSSREW, is forwarded to WT. When VSSREW is 
entered as the result of the corresponding parameter's 
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Figure 73 - The Input Program - Transition Subroutines 



removal from the WT queue, it forces the phase 1 
tape termination procedure, provided that the write 
tape has not, by itself, just applied this procedure. 
Should this be the case, VSSREW just returns to 
VSETX to get the next parameter from the WT queue. 
VSSREW is able to make the distinction by testing 
the record and file counts, both of which would be 
zero if -VSSREW were picked up when a new tape was 
being attached. 

The System Input EOF Command 

The EOF command is received in either of the two 
card reader modes from a card which should be the 
last card in the file. A file terminated in this way 
will not cause the message, "Service the card reader, " 
to be printed, as would a card reader file terminated 
by EE alone. It will set a bit, VEOFX, to 1, to 
indicate that the card reader will be inactive for an 
extended period. The procedure for restarting the 
card reader is unaffected, however. 

Internally, the EOF command works in conjunction 
with -VEES parameter which is forwarded from CR 
when an"EE is received on the card reader. This 
parameter propagates itself to the ultimate destination 
of the cards, which would be WT in the online mode, 
and E in the bypass mode. When it is picked up at the 
final destination, it tests VEOFX and puts out the 
service message through the commentator only if the 
bit is zero. By thus delaying the message, the EOF 
routine gets a chance to suppress the printing of the 
message. 

When the VEOF routine gets control, it first tests 
to see if it was the last card in the file. If it was not, 
the command is ignored, otherwise the VEOFX bit 
is set. The VEOFX bit is also set by the VOFFLB 
and VOFFLN routines. After setting the VEOFX, the 
VEOFB routine, (corresponding to EOF in bypass 
mode), just gives a normal return to commands. The 
VEOFN, corresponding to EOF in online mode, then 
gives control to the VSREW routine as if it had been 
a rewind command. The VBSTRT routine, corres- 
ponding to a BYPASS command received in the bypass 
mode, is a special routine used in starting the sys- 
tem. 

The Initial Start of the Input Program 

The input program starts when the command package 
issues one of the transition commands to it. The 
command sets the mode of operation. The program 
is initially set up so that some of the normal transi- 
tion routines can start the system. Specifically, it 
is made to appear as if the current mode were bj?pass 
and the previous mode were offline, that is: 



1. The command dispatcher is set as if in the 
bypass mode. 

2. Phase 1 is in a bypass configuration; namely, 
CR to SC to E and back. The VREQ routine is set to 
service requests from E. 

3. The VTSA queue contains two tape lOD numbers, 
VRTP and VWTP, and the tapes have ST destinations. 
VTSA is blocked with a non-zero VXl. 

4. All functions programs are devoid of assigned 
buffer areas except CR, ST, RT. These are ultimate 
sources of information for the buffers and have a 
full complement of 34 cards assigned. 

If the command dispatcher is set as if in the bypass 
mode, one of the three routines, VONLIB, VOFFLB, 
and VBSTRT will be addressed by the initial transi- 
tion command entry. The VBSTRT routine is used 
when a bypass command is received in the bypass 
mode. This routine starts up the card reader by 
using the VACT routine for CR. As a safeguard it 
also modified the particular entry in the command 
dispatcher which addressed it, so that BSTRT will 
never be addressed again. Since the program is all 
set up for bypass operation, no other action is 
required. 

The VONLIB and VOFFLB routines are able to 
initiate their respective modes as they normally 
would, except that the VOFFLB routine must set a 
bit, VCSAW, to 1 to satisfy the test for the last card 
in the card reader file despite the fact that the 
command did not originate from a card. 

The ST destinations of the tapes in the VTSA queue 
is significant because either overlapped mode will 
accept such tapes. However, if the destinations were 
WT, the offline mode would reject the tapes, putting 
them through an unload cycle. This would be a 
nuisance to the operator in starting up the system in 
the offline mode. Phase 4 cperation is started in 
the normal way by the tape switch mechanism when 
and if the first tape is attached to RT. 

The Input Program Fixup Routines 

The input program normally uses three I-O tables 
of exits, and uses certain others during error recov- 
ery. EOP, EE, and CS interrupts relate directly to 
the functional programs , and no special fixup routines 
are provided. The input program fixup routines are 
confined to UK and EPGK error recovery routines 
for the various pseudo-ops. 

The basic purpose of the input program UK pro- 
cedure is to complete successfully any I-O pseudo-ops 
initiated by the input program. There are two possi- 
ble results of the UK procedure: 

1. A successful retry of the pseudo-op. This has 
no net effect on the input program. 
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2. An unsuccessful retry of the pseudo-op, and 
subsequent rejection of the jobs involved in oirder to 
keep the system running. 

Thus, the UK procedure consists of two distinct 
phases for each error source: the retry- of the 
pseudo-op, and the internal adjustment if it is 
unsuccessful. 

This approach is used separately for each of the 
following: 

1. UK/EPGK on tape write 

2. UK/EPGK on card read 

3. UK/EPGK on tape read 

4. UK/EPGK on WEF 

5. UK/EPGK on other pseudo-ops 

The Input I-O Tables of Exits 

Three 1-0 tables of exits are associated with the 
input functional programs: 

lODNAME TOE Program 

VCRD VCREXT Card reader 

VWTP VWTEXT Write tape 

VRTP VRTEXT Read tape 

The tables of exits are permanently associated with 
the lOD names specified; however, the two tape tables 
alternate between the read and write (scan) tape 
functions . 

Each tape table has the following form: 
A VF, (Functional program table name) 

(I-O DRZ, (BU, 64), 2 

TOE SIC, RKSBRC; B, RKSUK 'UK.EPGK 

name) LV, VU, A; B, -.32(VU) 'EE 

LVI, VT5, (lODname); B, VTDSP 'CS 
LV, VU, A; B, -1. (VU) 'EOP 

The card reader table differs only in that the CS 
position contains a branch to VRDCSS. 

As previously mentioned, it is the function of the 
tape switch routines to enter the proper lOD name in 
the VSU position of the tape program tables, and to 
put the corresponding table name in the VF at A 
ahead of the TOE. Thus, when either I-O TOE is 
entered with EOP or EE, control is given to the 
proper functional prc^ram table at the slot corres- 
ponding to the interrupt. When CS occurs, control 
is returned to the tape switch routines, and when an 
error interrupt occurs, the fixup routine is entered 
at RKSUK. 

Generalized Dispatcher 

When an error interrupt occurs during an input pro- 
gram, the following steps are taken (Figure 74): 

1. A test is made for EPGK or UK. 

2. The pseudo-cp is identified as $W or $RD. If 



$W, go to RGWUK (Figure 75); if $RD, go to RDUK 
(Figure 80) . 

3. A test is made to see if the UK did or did not 
have an EOP. If not, go to RGNOGD (Figure 82). 

4. The pseudo-op is again tested to see if $WEF. 
If not, go to RPUKLl (Figure 82). If it is, enter 
write end of file procedure. 

Notice that the test for EOP is made after checking 
for a $W or $RD pseudo-qp. If a UK- no EOP condi- 
tion appears with $W, it may be a data error in a 
chained op on a write tape, which can be fixed by 
RGWUK. On the other hand, if a UK- no EOP condi- 
tion appears with a $RD, it could be a card reader 
jam, which is taken care of by RDNOTP. A $WEF or 
pseudo-op lack of EOP is a unit down type condition. 

EPGK Condition 

The input program may cause a legitimate EPGK in 
the following situation (Figure 74): If the input pro- 
gram was in the offline mode, any scan tape to be 
saved would be file protected. If cai^ht in a transi- 
tion to online, this tape would be used as a write tape. 
When the $W attempts to write on this tape, an EPGK 
would be given. The tape must be unloaded and a 
scratch tape mounted before $W can be reissued. 

UK on Write or Write End-of-FUe 

A retry of both the $W or $WEF pseudo-ops wUl 
follow the same general procedure (Figure 75). The 
tape will be repeatedly backspaced to the preceding 
record gap and the write pseudo-qp retried. When an 
arbitrary number of retries has been made, an erase 
gap SEOP (ERGS) is performed whereupon the back- 
space-write retry count is reset and the retry series 
begins again further along the tape. The ERG pro- 
cedure is also limited by an arbitrary count, and 
when the count is exhausted the situation is considered 
a total UK failure. 



Setting Up a Retry of $WEF: UK is possible on any 
of the following WEF cases: 

1. There were two consecutive WEF's and the tape 
did not move. 

2. There were two consecutive WEF's and the tape 
did move. 

3. There was one WEF and the tape did not move. 

4. There was one WEF and the tape did move. 

The first step in handling a UK in any of these cases 
is to backspace the tape, after which a $RET is given. 
On the next interrupt another $WEF is attempted, 
after which the program is restored. 
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Figure 74 - The Input UK Fixup - Entry and EPGK 
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Figure 75 - The Input UK Fixup - UK on $WEF and $W 



If an EE appears on a WEF after a backspace, the 
implication is that case 1 above was attempted and 
the tape did not move on the second WEF. After a 
$SPFL, the second $WEF may be reinitiated. 

If an EOP appears after a backspace, any of the 
other three WEF cases are possible. The record 
count must now be tested (Figure 76). If greater than 
zero, the UK occurred in case 2 above. The tape did 
move but the $BSP has put the tape in position for 
$WEF to be reinitiated. If, however, the record 
count is equal to zero, only single WEF, cases 3 and 
4, need be considered. To determine whether or not 
the tape has moved, a one card read is initiated. If 
the $RD gives UK-EOP or EOP alone then $CCW is 
given and the word count is tested. If zero, the tape 
did not move and the WEF may be retried; if not zero, 
the tape moved and a bad tape mark was written on 
tape. A backspace must be given before reissuing 
$WEF. If the $RD gave a UK alone, the tape is 
rejected. 

Retry of $WEF or |W: When a UK appears on a $W, 
only a backspace need be given before retrying the 
$W. The retry operation for $W or $WEF is very 
much alike. The tape is now in position and the $W or 
$WEF is given. The EOP slot in TOE is changed to 
RESTOR, and if on the interrupt an EOP is received, 
TOE is restored and control is given back to the input 
program. If, however, a UK is received, the entire 
fixup routine is repeated again. The tape is again 
backspaced and the type of operation, W or WEF, 
again established. A $W or $WEF is rewritten and 
the program restored. If a UK is received again, the 
fixup routine is begun once more. A count of the 
number of tape backspaces is maintained, and when 
an arbitrary limit is reached, an erase gap ($ERG) 
pseudo-op is performed. The backspace count is 
reset and the $W or $WEF again retried. An ERG 
count is also maintained, and when its arbitrary limit 
is reached, a total UK failure is assumed. 

Total UK Failure on $W or $WEF: When a total UK 
failure occurs, the fixup program must eliminate the 
offending job both from the tape and parameter queue 
as well as terminate the input tape with two consecu- 
tive tape marks (Figure 76). Notice that the input 
program rather than the fixup program puts on the 
second tape mark. This is done because if the fixup 
program put the $WEF on tape and a UK should occur, 
the fixup program would consider this as a very 
special case, necessitating a great deal of extra 
coding. By giving the input program this chore, a 
UK here can be handled by the general $WEF fixup. 
The fixup program must now dispose of all traces 
of the job from the input program tables, queues, etc. 



(Figure 77). If the operation that failed was a $WEF, 
the job is completely on tape and a $BSFL will elimi- 
nate it. If it was $W, the buffer position pointer (VX) 
must be moved beyond the offending job's cards as 
each parameter is removed from the write tape 
parameter queue. As the cards are skipped over, 
their space is made available to the card reader to 
refill. The number of cards being skipped over is 
contained in VT5, which is added to VX. Each param- 
eter is examined as it is passed to the WT queue until 
-VWEFT is found. This is done by RESRCH and its 
associated routines. 

After the preceding backspace, a $SPFL is given 
and the terminating tape end of file mark is written. 
If the original failure was a tape terminating WEF 
which did not move the tape, a REDOBL entry is 
made (Figure 76) . The program cannot $SPFL and 
$WEF as in other cases, but must $BSFL over a com- 
pleted job, $SPFL and then $WEF. Since a good job 
has been eliminated, the file count must be reduced 
by one. 

In any case, should the second attempt to write end 
of file fail to terminate the tape, the entire tape is 
rejected via REDUMP and the appropriate job reject 
information given to job control. The entire tape will 
also be rejected immediately after the ERG count is 
exhausted if there was a previous total failure on the 
same tape or if the failure occurred on the first file 
(to prevent backspacing into the label) . 

UK on Card Reader 

In general, there are three types of card reader 
failures: a mechanical feed failure, a read failure, 
or a mixture of both. The card reader fixup program 
can handle card jams, misfeeds, and misreads mixed 
in any order. Five UK cases are possible: 

1. A single UK following a B card. 

2. A consecutive total UK failure. 

3. Two or more total UK failures with cards 
between on the same input read. 

4. A single UK followed by cards. 

5. A single UK on the last card of the read. 

Card Reader Feed Failure: The fixup program deter- 
mines whether a UK or a UK-EOP occurred on the 
card reader. If UK, a feed failure is assumed. The 
operator is notified (Figure 78) and he pushes the 
ready key if he can clear the jam, or the channel 
signal (CS) key if he cannot. The card reader is in 
the not-ready status when the CS is generated. The 
fixup program takes this as a signal to go into offline 
operation. If the card jam has been cleared and the 
cards reloaded, the operator pushes the ready key, 
causing another $RD to be issued. 
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Card Reader Read Failure: If a UK-EOP was 
received, a read failure is possible. The operator is 
notified to service the card reader. After reloading 
the cards, the operator pushes the ready button and 
tries again. The operator is expected to retry the 
read at the request of the input fixups, then if the 
attempt is not successful, the job may be abandoned. 

Card Reader Total Failure: In case of a total UK 
failure where none of the job can be saved, the fixup 
program must reject the job. It first checks to see 
whether the card reader is on-line or not (Figure 79). 
If not, it looks to see whether: (1) the UK came when 
the system was in transit from bypass to online, in 
which case it gives control back to the input transition 
routine, or (2) the job was finished, in which case 
there is no reason to reject it and control can be given 
up normally, or (3) the MCP asked for the card, in 
which case a bit is set and control is given back to 
the input program. If the card reader is not online 
and none of these conditions hold, the fixup program 
primes EOJ and gives $RET. 

If the card reader is online, the fixup program 
makes the read failure look like a write tape total 
failure to simplify Job Control communication. The 
WT is given a $BSFL, the RESRCH routine is entered, 
and parameters are stripped from the WT queue. If 
the card reader total failure was passed to the write 
tape so as to occur on the first job on tape, a $BSFL 
would result in EPGK. Control therefore goes to 
REDUMP to reject the tape. 

UK Card Dropped or Retained: The fixup program 
will only reject jobs in which there is no doubt that 
a total UK failure occurred. In some cases a UK 
card is left in the buffer so that no more jobs than 
necessary are rejected. The UK card will either be 
read over in core or will be left in the buffer to be 
tested by the input program according to the 
following situations: 

1. The UK card will be read over in core if: 

a. A total UK occurs but the UK card is pre- 
ceded by a B card. The current job is 
rejected and the UK card is immediately 
read over. 

b. The UK card is preceded by another UK card. 
The first UK card will determine which job 

is rejected and the second UK card is read 
over. 

c. There are two or more UK cards with good 
cards in between on the same input read. 
Treated as in (b) above. 

2. The UK card is left in the buffer to be tested by 
the input program if: 

a. There is a single UK card followed by good 
cards . 



b. A single UK appears on the last card of the 
read. 

UK on Read Tape/Scan Tape 

If a failure occurs on either a scan or read tape, the 
same fixup procedure takes place. A $BSP-$RD series 
is initiated and continued until an arbitrary count is 
exhausted (Figure 80). If the UK is still present, it 
might be caused by a dust particle. The tape is now 
backspaced three times and then spaced to its original 
position in an attempt to dispose of any dust particles. 
The $BSP-$RD series is reinitiated and a triple back- 
space again takes place. The triple backspace pro- 
cedure is also controlled by an arbitrary count. A 
total UK failure is assumed when the triple backspace 
count is exhausted. 

If the UK had occurred sufficiently close to the 
beginning of the tape, backspacing might cross the 
label file mark, giving an EPGK. This resets the 
space count and causes entry into the space procedure. 

RT/ST Total Failure: A total failure on a scan tape 
might have happened at an inopportune time for the 
input scanning and I-O preassignment in Job Control 
whereas a total failure on a read tape has no problem 
in this respect. In any event, a $SPFL is given. 

If the failure occurred on a scan tape, a $BSFL is 
given (Figure 81), then a negative parameter 
(-RKSCNN) is put in the SC parameter queue and 
control is given to the input program. The input pro- 
gram must always be given a first B card to be able 
to terminate a previous job, while preassignment 
must be given the B- non-B break to round up pre- 
assignment correctly within a job. A test is made to 
see whether JCl has gotten the first B card. If not, 
a blank card except for a B in column one is given to 
JCl, followed by 16 blank cards. If it has gotten the 
first B card, then 17 blank cards are given to JCl. 
Control is returned to the input program. 

If the failure occurred on a read tape, a check is 
made to see whether an EOJ has been issued. If it 
has, the fixup program will not reject the job but 
will instead return control to the input program. If 
an EOJ has not been issued, a -RTDOWN is put in 
the Q parameter queue causing the correct job to be 
rejected, and the input job boundary is set up. Con- 
trol is then given back to the input program. 

In addition to the cases previously described, an 
extreme case of RT/ST total failure is also provided 
for. Should a one or two card file consisting only of 
command cards be read successfully in one phase but 
not the other, JC will expect an entry in its tables for 
the phase in which the failure occurred but will not 
recognize this file as a job in the successful phase. 
The extra table entry would put JC out of phase, 
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causing a BEW,$. Both input and input fixups have 
had recent additions to check for this situation. 

UK on Pseudo-Op 

A failure on a pseudo-op calls the pseudo-op UK 
routine into play (Figure 82). Not only does this 
routine try to reissue correctly all non-data transfer 
pseudo-ops given by the input program, but it also 
tries to reissue all fixup program pseudo-ops. The 
type of pseudo-op is identified and is retried an arbi- 
trary number of times , after which the total failure 
procedure (RPQUES) takes over. 

Pseudo-Op Total Failure: The RPQUES routine will 
handle a total UK failure on a pseudo-op (Figure 83). 
RPQUES may be entered from either an input program 
procedure or a fixup program procedure. A check is 
made to see which program entry was made, and 
whether the I-O unit involved was a read tape, scan 
tape, or write tape. Since the card reader has no 
non-data transfer pseudo-ops, it is not considered. 
RPQUES will then proceed to make arrangements to 
dispose of the tape and its preassignment, clean up 
the input program tables , and activate the proper 
communication link to Job Control. In order to avoid 
a pseudo-op failure on top of a pseudo-op failure, 
RPQUES uses only a $UNLD pseudo-op which MCP 
handles so as never to give a UK to the input or fixup 
program. 

UK with No EOP 

If a UK appears with no EOP, it is considered a total 
failure situation (Figure 82). The RGNOGD routine 
checks to see what tables have to be set up before 
giving control to RPQUES. 

Fixup Program Significant Counts and Bits 

I. JC Communication 

1. WT 

REJJOB=l. , JC rejects one job 
REJJOB=2. , JC rejects tape 

2. RT 

REJJOB. 60 on, JC rejects current job 
RKSRTB on, JC rejects # of jobs indicated 

by RKRTBL 
RKRTBL contains # of jobs left on tape 

3. ST 

REJJOB. 61 on, JC rejects current job 
RKSBIT on, JC rejects # of jobs indicated 

by RKBITL 
RKBITL contains # of jobs currently pre- 

as signed 



4. CR 

REJJOB. 60 on, JC rejects current job 
II. Internal Fixup Program 

1. REJJOB. 17 on, (see Ila) indicates a UK total 
failure on a $W or $WEF. 

2. REJJOB. 63 on, an ERG is to be given upon 
completion of a backspace op. 

3. REJJOB. 62 on, a UK total failure has occurred. 

4. REJJOB. 59 on, a UK total failure has occurred 
in the middle of an ONLIB transition. 

5. RPRTEX-.33, used to control TOE getting 
ultimate control following RPQUES routine. 

6. Table with two entries, one for each of two 
lOD's: 

VF indicates if >■ the number of files preceding 

the command card file 
CF indicates the number of files preceding the 

last file on tape to get UK for use in case ST 

failure but RT okay, 
in. Retry Count Fields 

1. RWTRY/ - (WT) limits the number of $BSP - 

$0P procedures to RKD SYN — 

2. RETRY/ - (WT) limits the number of $ERG 

following RWTRY failures to 
RKC SYN — 

3. RTTRY/ - (ST & RT) limits the number of 

$BSP - $RD procedures 
to RKB SYN — 

4. .RTSP3X/ - (ST & RT) limits the number of 

triple spacing procedure 
to RKH SYN — 

5. RBSP3X/ - (ST & RT) controls spacing ops to 

give 4 $BSP and 3 $SP 
to reposition tape to 
give $RD 

6. RCOUNT/ - (CR) limits the number of retries 

done by the operator to 
RKF SYN — 

7. RCJAM/ - (CR) an infinite count of card feed 

operations used by fixup pro- 
gram to control changing of 
TOE 

8. RPTRY/ - (WT.ST or RT) limits the number 

of pseudo-op 
retries to 
RKA SYN — 

SYSTEM OUTPUT 

The system output program performs the writing 
required by the system pseudo-ops $SPR and $SPU. 
In addition, it provides logical control of the infor- 
mation on the tape at EOJ, and responds to the system 
command: COMD, OUTPUT. 

The program consists of four major packages (print. 
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punch, EOJ, output command) and a common sub- 
routine to accomplish tape switching when required. 
In addition, fixup routines are provided to handle 
interrupts from the input tape. 

The Output Tape 

The tape prepared by tlie output program is intended 
to be processed by the system peripheral output pro- 
gram on the IBM 1401. It consists of a mixture of 
printer and punch records. Each physical printer 
record contains twelve full lines, and each physical 
punch record contains ten card images. 

A record is written at EOJ and whenever the speci- 
fied number of units of output has accumulated. Jobs 
are separated by tape marks, the end of output on the 
tape being indicated by a double tape mark. This is 
followed by a trailer record indicating whether or not 
the tape was terminated at the same time as the job. 

In order to expedite physical tape switching, two 
output tapes (CTll and CT21) , are defined by lOD 
cards as distinct units on the same channel. The 
I-O tables of exits (TOE) for these two units are 
AXITA and AXITB, respectively. Since the output 
tape may be referenced by any of the output programs 
and by error control routines, five parallel TOE's 
are used to direct control to the various fixup routines. 
Additional TOE's are used by the error control 
routines. Any time the output tape is referenced by 
one of the output programs, the location of the appli- 
cable TOE is stored in AOP. The basic TOE's, AXITA 
and AXITB, pass all interrupts except CS to the table 
specified in AOP, along with the two control words. 
On receipt of a CS interrupt, control is given to the 
fixup routines ATPACS and ATPBCS respectively 
(Figure 84). If a tape switch is in process, these 
routines give control to the tape switch routine to 
complete its function. Otherwise they set a bit 
(ATARI, ATBRI) to indicate that the tape is ready, 
and they issue a $RET. 

The Print and Punch Programs 

The print and punch programs are logically identical. 
(See Figure 85). Since printer and punch output cannot 
be predicted, they are written as separate programs, 
and are to be buffered and controlled separately. 

Pseudo-ops $SPR and $SPU, respectively, cause 
the print and punch programs to receive control from 
the IF analyzer with tentacle table linkage set up. 
The print program begins at CSTART, the punch pro- 
gram at ASPUO. The respective tentacle tables are 
SCSPRT and SASPUT, each four words in length. 
Both programs operate enabled, and use parameters 
specifying the FWA of the output and the number of 



lines (or card images) of ou^ut. Both programs 
save and restore index registers 7 to 15, and both 
exit with $RET, with ABEOJ primed if a PP param- 
eter specification exceeded PP boundaries. 

The method of both programs is as follows: Upon 
entry, AEOJI, a special control indicator used at end 
of job (see output EOJ), is reset. The index registers 
are saved and, if PP is the user, subroutine ACHK 
is used to check the parameters with the PP bound- 
aries. If the FWA exceeds PP boimdaries, SPR and 
ABEOJ are primed (the former to provide an error 
message) , and $RET executed immediately. If the 
FWA is within PP boundaries but the calculated last 
word is not, SPR and ABEOJ are primed and the 
parameters modified to stay within PP boundaries. 
Partial output is performed. If the parameters are 
in bounds, the program enters a loop, moving one 
unit of output at a time to the print or punch trans- 
mit buffer until the output request has been completed 
or the buffer has been filled. When the output is 
completed, buffer control is saved, index registers 
are restored, and $RET is executed. Whenever the 
transmit buffer is filled, the program uses a sub- 
routine (CAOS3A for print and AWSCH for punch) to 
wait for the output tape to become available, to 
logically swap the transmit and write buffers by 
interchanging control words, and to write the full 
buffer on the output tape. In addition, the respective 
subroutines set a control word (AOP) so that the 
resulting interrupt wiU be taken by the proper table 
of exits (for print, CEXN; for punch, ZWEXIT). 

Figure 86 presents the control symbols used in the 
two programs. 

The print and punch routines use parallel I-O tables 
of exits CEXN and AWEXIT, respectively. These 
tables cannot be entered at the channel signal return, 
since a CS is taken by the first level table of exits. 
The EOP and EE fixup routines for these tables are 
given in Figure 87, and the error return fixup is 
described with the error routines. 

Output EOJ 

At end of job, the output program is given control to 
complete output for the job being terminated and to 
write a separating tape mark. Output EOJ is a major 
package with an associated tentacle table (SAEOJT). 
It is called by the sequence: 

B, $MCP 
, SSPEOJ 
during processing of $EOJ or $ABEOJ by Job Control 
4. 

The program starts at AEOJ (Figure 88) and oper- 
ates enabled. It saves $7 to $15, and determines 
whether or not there is information in the punch 
transmit buffer. If there is, it is written on the 
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CBTA ABTA 


If set to 1, the logical 


Set when buffer is 


CEXN 


If EOJ is in process 


The output tape 




transmit buffer is full. 


full, reset by buffer 


(Print) 


(AEOJI set), EE is 


busy bit (CATUB) 






switch subroutine. 




treated as EOP. 
Otherwise, the Trailer 


and the write buffer 
in use bit (CBWA) 


CBWA ABWA 


If set to 1, the logical 


Set by the buffer 




record is set to denote 


are reset. If the 




write buffer is being 


switch subroutine, 




physical end of tape, 


transmit buffer is 




written. 


reset by the EOF 




and tape switch 


fUll(CBTA=l), 






fixup. 




(ATSWCH) is entered 
with return set to the 


control is given to 
CAOS3A to initiate 


CATUB CATUB 


If set to 1, the out- 


Set by both buffer 




EOP fixup. 


another write, and 




put tape is busy. 


switch subroutines, 
reset by the EOF 
fixup. (Also used 
elsewhere in output. ) 


AWEXIT 




$RET is issued. 
Otherwise, $RET is 
given immediately. 


CCX. 17 AACX. 17 


Flip-flop for control 


Initially 1. Inverted 


(Punch) 


Same as for CEXN. 


Same logic as 




word selection. 


by buffer switch 
subroutine. 






CEXN, using punch 
bits ABWA, ABTA, 
and the punch write 
routine, ASWCH. 



Figure 86. Print and Punch Control Symbols 



Figure 87, EE, EOP Fixups for Print and Punch 



output tape and control given to CEOJ. If not, con- 
trol is given directly to CEOJ, where the process is 
repeated for the print transmit buffer, in this case 
filling the unused portion with blanks. Both programs 
test control bit CATUB to wait for an output in process 
to finish. At the conclusion of the print output, a tape 
mark is written. The flag, AOPTRI, is tested to 
determine whether or not an output command has been 
received for execution at EOJ. If not (AOPTRI zero) , 
$7 to $15 are restored and $RET executed. If an out- 
put command has been received, control is given to 
the output command program at CDRYl. 

The subsequent interrupt is taken by the I-O Table 
of Exits CEXEF. On EE or EOP, the tape busy bit 
(CATUB) is reset, and $RET issued. 

Output Command 

The COMD, OUTPUT is used to request termination 
and unloading of the current output tape at the next 
(or present) EOJ. The output command program 
receives control at CDRY (Figure 88) via its tentacle 
table, SCDRYT. It operates enabled. 

Upon entry, index registers 7 to 15 are saved and 
the output end of job indicator, AEOJI, is tested. If 
the system is not at EOJ (AEOJI zero), the output 
command request indicator, AOPTRI, is set, the 
index registers are restored, and $RET is executed. 

Control is given to CDRYl if the system is at EOJ 
when the command is given, or by the output EOJ 
program when EOJ occurs. After waiting, if neces- 
sary, for an output in process to finish, a test is made 
to determine whether or not the current tape has been 



used. If not, a tape switch is not required, and the 
index registers are restored and $RET is executed. 
Otherwise, the output tape busy indicator (CATUB) is 
set, the trailer record is set to indicate physical and 
logical EOT, and control is given to the tape switch 
program to write one tape mark, the trailer record, 
and switch tapes. Return is set to $RET. 

Tape Switch 

The tape switch subroutine (ATSWCH) is used by all 
four output major packages: print, punch, EOJ, and 
command. It is entered by print, punch, and EOJ 
from the respective fixup routines on occurrence of 
an EE interrupt. It is entered by the output command 
program at EOJ. 

There are two calling sequences used to enter the 
tape switch routine. To write two tape marks and 
switch tapes, the following calling sequence is used 
by the EE fixup routines: 

LVI, $15, (return) 

B, ATSWCH 

The following calling sequence is used by the output 
command program to write one tape mark and switch 
tapes, since one tape mark has already been written 
when control is given to the output command program: 

CMOOOO, ATMI 

LVI, $15, (return) 

B, ATSWC3 
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OUTPUT EOJ 



* AECJ • 

* « 



SET EOJ IhD. 

<AVB IhOEX 
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Figure 88 - The Ou^nit EOJ and Output Command Programs 
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Bit 5 of the one word trailer record (CTRAIL. +. 5) 
indicates whether or not the physical end of tape is 
also the logical end of tape (EOJ). On entry from the 
print and punch fixups, the bit will have been set to 
zero, indicating only physical EOT. On entry from 
output EOJ, and output commands, the bit will have 
been set to one, indicating logical EOT (EOJ). 

After saving the return address, the routine (Fig- 
ure 84) sets ATSXIT in AOP as the current table of 
exits, writes a tape mark, restores index registers, 
and executes $RET. Depending on the entry condi- 
tions, this may or may not be in auto stack mode. 
The rest of the routine operates entirely in the auto 
stack mode. 

Upon EOP, the control bit ATMI is reset and, if it 
had been set, another tape mark written. If it was 
not set, a new table of exits, ASTRA, is set into AOP, 
and the trailer record is written. (Note: For EPGK 
and UK fixups for tables ATSXIT and ASTRA, see 
description of the error routines.) $RET is then 
executed. 

When the EOP occurs for the trailer record, the 
tape is unloaded. If another tape is ready, as evi- 
denced by a CS having been received (ATARI or 
ATBRI=1), the corresponding lOD name (CTll or 
CT21) is set into AMR as the current tape, the tape 
busy bit (CATUB) is reset, the new tape bit is reset 
(CXY+. 19), and control returned to the return 
address. If a new tape is not ready, the tape switch 
request bit (ATSWCR) is set and $RET is executed. 
With the tape switch request bit set, the CS fixup 
routines (ATPACS, ATPBCS) will give control to the 
tape switch routine (ATSWC4 or ATSWC6) to reset 
the bit and complete the tape switch as previously 
described. 

The logic described for tape switch is dependent 
upon the following: 

1. The tape ready bits, ATARI and ATBRI, are 
assembled as and 1, respectively. 

2. The initial tape selection is CTll, with I-O 
TOE AXITA. 

3. The MCP receptor will pass a CS interrupt to 
the program table of exits only if it is received after 
an unload operation on the same unit. 

4. Upon entry, and until completion of tape switch, 
the output tape busy bit (CATUB) is set. Thus, if a 
$SPU or $SPR is given, the corresponding programs 
will wait for a free output tape and will not destroy 
the contents of AOP, which specify a tape switch table 
of exits. 

Error Control 

A set of error control routines with their own 1-0 
tables of exits is used when UK or EPGK interrupts 



occur in one of the five output program tables of exits 
previously described. These routines are: 



Symbol 


Occassion for Use 


Table(s) of Exits 


AEPGK 


EPGK occurs on write 


..- 


CKUK 


UK occurs with EOP on write 


CUKUK, CKWRIT 


ALNUKC 


UK occurs without EOP on write 





AUKEF 


UK occurs on WEF 


ATSWIK 


AERRUN 


UK without EOP occurs on writing 






trailer record 





ANFM 


Announce unusual end of tape 





AGFM 


Announce unusual end of tape 






The error routines are entered as follows for the 
various combinations of error interrupts and tables 
of exits: 







Interrupt 




Original TOE 


EPGK 


UK-not-EOP 


UK- EOP 


CEXN 


AEPGK 


ALNUKC 


CKUK 


AWEXIT 


AEPGK 


ALUNUKC 


CKUK 


ATSXIT 


AUKEF 


AUKEF 


AUKEF 


ASTRA 


AERRUN 


AERRUN 


CKUK 


CEXEF 


AUKEF 


AUKEF 


AUKEF 



AEPGK 

The EPGK error routine, AEPGK, is entered with the 
actuated address in $2 when the interrupt is received 
by tables CEXN or AWEXIT. The EPGK is assumed 
to have been caused by a file protected tape being 
mounted on an output unit. A message is typed via 
the commentator, and the tape switch routine is 
entered at ATSWCH5 to unload the tape and select a 
new one. Return is set to try the write operation 
again. In all other cases, EPGK is treated as UK- 
not EOP. 

CHUK 

The general UK routine is entered when UK and EOP 
(UK- EOP) occur on a write operation. It is entered 
with the address of the TOE in $1, and with $3 speci- 
fying the return to be used if retries are unsuccessful. 

The routine tries the sequence $BSP, $ERGS, $W, 
using the original control word for the write. The 
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$BSP is given with TOE CUKUK set in AOP, and the 
$ERGS and $W are given by the $BSP EOP fixup, 
which changes the TOE selected to CKWRIT. If this 
table receives an EOP or EE, it is passed to the 
corresponding entry in the original TOE. Otherwise, 
the $BSP is tried again. The sequence of retries will 
be attempted ten times. If the write is still not suc- 
cessful, control is given to the specified failure 
return. This return is ANFM if a print or punch 
record is being written, and C2FM if a trailer record 
is being written. These routines are discussed under 
error message routines. 

AUKEF 

This routine is entered if UK or EPGK occurs when 
attempting to write a tape mark. If EOP did not 
occur, control is given to AERRN. If EOP did occur, 
the routine will attempt the sequence $ERGS, $WEF, 
using TOE ATSWIK. On EOP or EE, control is 
returned to the corresponding entry in the original 
TOE. On ten consecutive failures, control is given 
to the failure return originally specified in $13. This 
return is AlFM if a WEF was being attempted by tape 
switch, and AOFM if the WEF was being attempted 
by EOJ. 

Error Message Routines 

In the event of failure to write, a message is printed 
via the commentator. The message specifies data 
or unit failure, the channel and unit, and the number 
of file marks on the end of the tape. Two routines 
may be used to print the message. Both print the 
message, and enter tape switch to unload the bad 
unit. However, they set different returns from tape 
switch. 

ANFM: is used when a print or punch record could 
not be written. Tape switch return is set to retry 
the original write. It is entered via ALNUKC, and 
directly at ANFM. 

AGFM: is used when no further attempt will be made 
to accomplish the output operation. It sets the tape 
switch return to $RET. It is entered via AOFM, AlFM, 
C2FM, AERRN, and AERRUN. 

THE DISK FETCH PROGRAM 

The disk fetch program transmits named system 
material from the permanent read only storage area 



(PROSA) on the disk to a specified area of the user's 
core when the pseudo-op $FETCH is requested. The 
requested material does not have to start at an arc 
boundary and need not be an integral number of arcs. 

The $FETCH pseudo-op requires the linkage: 

B, $MCP 

, $FETCH 

(AX)DD(BU,48,6), TYPE AREA X 

, RELFWA.(I) 

, FWA.(J) 

, N.(K) 

, M 

(Error Return) 

(End Return) 

(Normal Return) 
where: 

TYPE AREA is an eight-character name of a 
specific part of PROSA. 

RELFWA. (I) specifies the first word within the type 
area (relative to the type area starting 
address) which is to be brought into 
core storage by $FETCH. 

FWA. (J) specifies the first word (18 bit) address of 
core storage into which $FETCH will 
read the requested part of the type area. 

N. (K) specifies the number of full words requested. 
J£ N. (PQ is zero, $FETCH will read in 
all of the type area from RELFWA. (I) 
onward. 

M will be set by $FETCH if and only if N. (K) words 
cannot be transmitted. M will then 
contain the number of words which were 
transmitted. 

End Return is a half-word instruction to which 

$FETCH will return control with M set 
as above, when the type area is 
exhausted. 

Error Return is a half-word instruction to which 
$FETCH will return with M set as 
above, when protected storage is 
violated or when a non-existent type 
area is called for. 

PROSA Controls 



The permanent read only storage area, PROSA, is 
written on the disk at IPL time from the master IPL 
tape prepared by the system update program. The 
first two type areas on the disk are the PROSA diction- 
ary and index. 
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The dictionary type area consists of as many arcs 
as necessary to provide a two word entry for each type 
area, as follows: 



Word 1 



TYPE 


K ' 

AREA 






Word 2 


12 




■^ 4S 


ARC 


WORD 




SIZE 
« 





12 



21 



28 



46 



The first 48 bits of each dictionary entry are the 
type area name in A6 code. The second word of the 
dictionary entry holds the disk location (arc and word) 
of the first word of the type area, and the number of 
words in the type area. 

Each arc of the dictionary may contain entries for 
more than one type, but all entries for a given type 
occur on a single arc of the dictionary. The diction- 
ary is in alphanumeric order by type area. 

The index is the second type area on PROSA. It 
contains a one word entry for each type in the format: 



TYPE 




ARC 


WORD 




TYPE NO. 



12 



32 



44 



53 



56 



63 



The 12-bit TYPE field contains the two A6 characters 
of the type- The arc word address is that of the first 
dictionary entry for the type. The type number is 
the number of areas listed under that type in the dic- 
tionary. The disk address of the index is contained 
in the second dictionary entry. 

The Disk Fetch Program 

The disk fetch program uses a 512-word buffer in the 
overlay area. When an arc of PROSA is read into the 
buffer, the corresponding portion of the dictionary is 
saved, since it is a map of the buffer area. 

Performing a fetch from PROSA consists of the 
following: 

1. Reading the first arc of the PROSA dictionary 
into core, to obtain the disk address of the index. 

2. Reading the index into core. 

3. Obtaining from the index the address of the 
dictionary entry for the type area, and reading that 
arc of the dictionary into core. 

4. Obtaining from the dictionary arc the disk 
address of the type area, and reading the type area 
into core, an arc at a time. 

5. Transmitting to the user's core the specified 
portion of the type area. 



In order to avoid going through all these steps on 
every $FETCH, the program does the following: 

1. Reads the index into a special buffer on initial 
entry (after IPL) and keeps it there, eliminating all 
subsequent reading of the index. 

2. Keeps track of the contents of its 512-word 
buffer, transmitting from the buffer if the requested 
information is there from a previous read. 

3. Reads directly into the user's core if possible, 
eliminating a subsequent transmit from the buffer. 

The program is entered at CFETCH (Figure 89) 
from the IF Analyzer with its tentacle table, XTENB, 
set up. The program operates enabled, non-SIO. 
On initial entry, the index is read into core. The 
value field XNFOST is used to record the kind of 
information presently in the disk buffer. Assuming 
that the buffer is empty, the following occurs: 

1. A sequential search of the index is made to find 
the dictionary arc for the type requested. An error 
return is made if the type is not in the index. 

2 . The arc of the dictionary containing the type is 
read into CDSKBF and a sequential search is made of 
the dictionary entries for the type to find the area. 
Error return is given if the type area does not exist 
in the dictionary. 

3. The arc-word address of the requested type area 
+ relative first word address is computed and the arc 
containing the requested information is located. If 
the information is at the beginning of an arc it is read 
directly into problem program (PP) memory. 

4. If the information is not located at the beginning 
of an arc, a buffer map, CBFMAP, is constructed 
consisting of the type area names occupying the arc 
of PRC6A to be read into CDSKBF. 

5 . The parameters are checked for errors and the 
appropriate return to the calling sequence. Error, 
End or normal return is set up in the tentacle table. 

6. The information in the fetch buffer is trans- 
mitted to problem program memory. If arc bound- 
aries are crossed, a control word is set up to read 
the information beginning at the arc boundary directly 
into PP memory. 

7. The used index registers are restored and con- 
trol is returned through $RET. 

If $FETCH is entered with CDSKBF containing an 
arc of the dictionary, a check is made to see if the 
type area name is contained in this arc, and if so, 
control is transferred to step 3, otherwise to step 1. 

If $FETCH is entered with an arc of PROSA in 
CDSKBF, the buffer map is scanned to see if this 
type area is in the arc in core. If not, control is 
transferred to step 1. If all or part of the type area 
is in core, it is transmitted to PP memory and if 
necessary, an arc of the disk is located and read in 
to complete the request. 
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SERVICE ROUTINES 



The service routines are those disabled MCP routines 
entered from the identifier which carry out service 
pseudo-op requests. They may be considered in 
seven groups: 

1. Those used to actuate I-O operations. 

2. Those used for symbolic 1-0 control. 

3. Those used to impose mode controls on inter- 

rupts . 

4. The commentator. 

5. Time service operations. 

6. Those used for transfer of control ($RET and 

$RAM). 

7. The communication region transmission 

operations . 
The routines in group six are functionally a part 
of the dispatcher, and are described with the dis- 
patcher routines. The routines concerned with I-O 
activity use the set of I-O control tables previously 
described. 

THE ACTUATOR I-O ROUTINES 

The actuator routines provide I-O pseudo operations 
corresponding to those provided by hardware instruc- 
tions. They operate on logical units which are 
defined through lOD cards. The lOD cards set up 
the control tables as described in the preceding 
section. 

When an I-O pseudo-op is requested, the actuator 
performs the requested operation and any setup opera- 
tions required. The actuator will always perform 
the following setup operations, since their equivalent 
is not provided in the pseudo-op repertoire: 

1. Locate for tape channels. 

2. Density for tape channels. 

3. Mode for tape, card reader, and punch channels. 
When the processing of a request must be delayed 

to await completion of a setup operation, control is 
usually returned via the service op return routine. 
However, the setup bit (SSETUP) is set in the UST, 
and SRETAD is preset in the UAT, to allow the proc- 
essing of the request to continue when the interrupt 
occurs. Since these controls affect the unit, it is 
possible for several I-O requests for distinct units 
to be in various stages of processing at any given 
time. 

The actuator I-O operations use a common group 
of subroutines to perform portions of request proc- 
essing which are common to several pseudo-ops. All 
actuator programs operate disabled, and are entered 
from the identifier when the pseudo-op is requested, 
or from the receptor when an interrupt caused by a 
setup I-O operation occurs. For either entry, index 



registers 4, and 10 through 13 contains the following 
in the value field: 

Index 

Register VF Content 

4 Equipment code 

10 Address of channel status word 

11 Address of unit status word 

12 Address of unit area table 

13 Address of file area table 

When entry is from the identifier, index registers 
through 3 contain the following: 
Index 
Register VF Content 

Address of control word (if appli- 

cable) 

1 Address of entry in I-O symbolic 

location table 

2 Actuated address plus 2.0 

3 Pseudo-op code 

In addition, the identifier has stored the actuated 
address in the file area table (SACTAD), the actuated 
file address in the unit area table (SFIAAC), the 
SEOP bit in the unit status table (SSEOP) , and has 
insured that the requested channel and unit are avail- 
able. (See the Identifier Routine. ) 

The Read Routine 

The read routine is entered at ZSTART (Figure 90). 
The control word is checked using the control word 
check subroutine (BCWCR) , and SEVLMK and 
SEVLTB are set for subsequent entry to the status 
evaluation routine. The mask and table are designed 
to check unit select, label verification, and console 
signal. The channel operating bit (SCHOP) is turned 
on in the channel status table, and the routine branches 
depending on equipment type ($4), entering the status 
evaluation routine (ZSTEVL) for tape and console 
equipment. For the card reader, the routine at 
KTESTM checks the mode and proceeds with the read 
instruction. For the disk, a special routine at 
ZDISKl is entered. Any other equipment code is 
illegal, causing an EPGK interrupt to be faked by 
an appropriate entry to the receptor. 

The routine at ZDISKl is used by both the read 
and write routines. It tests the disk locate setup bit 
(SLOCSU) and the high-speed exchange bit (SHSECH). 
If either is on, the routine turns off the channel 
operating bit (SCHOP) and enters an enabled loop to 
the actuating address via KCBUSY. When both are 
off, the routine computes the arc address of the last 



166 



—«—«••—«— 



••..•.•••••. .X«ZC I SK 1 



«ZDISK1 « 



* ZSTEVL « 

* LOCATE ANC « 

* VEflIFY ■ 
HCCNSCLE SIChAL « 



« IS DISK • 
SETUP LOCATED 
■IN PROCESS * 



• « 

• RESET Ci-ANNEL ■ 
.X» CPERATICN BIT « 

• (SCHtP) • 



»KCBU£Y • 



»«««••«««« 



* FINAL » 

»ARC ADDRESS* 
GREATER THAN 
* ALLOWED « 



.X*KILECL « 



« DOES 

FILE COUNT 
•ECUAL ZERO 



SPACE OVER 

LABEL TAPE 

HARK 



« • M 








SELECT 




X«F1LE AREA MODE «........X« 


LABEL 




* MULL « • 


l>.CDE 




« » • 






«•««# •*« 




>**« 



-«—«—«—■ 



CHECK FOR 

PROPER HODE 

SELECTED 



SET UP READ ■ 

OPERATION* « 

STORE IK SIOIKS* 

IN UAT » 



•CURRENT* 
» ARC FILE « 

AREA EQUAL 
•CURRENT ARC* 

•STATUS * 

• YES 



««*«««««••« 



.X*ZSTEVL * 



•«»««»««•• 



«««««*•««••#-• 



X» SELECT EIT ON ■ 
•N6tl UNIT NUMBER* 
*1N STATUS TABLE* 



.X*ZSTEyL * 



•SET SRD IN UST-* 

• IF DISK * 

• SET SHSECH IN * 
■ KCP CCfN * 
« RECICN * 



«««•«<» 



»««•«<*« 



.X»ZSTEVL • 



CHECK FOR 
REJECT. RETRY 
IF NECESSARY 



•X« KSUPP * 



Figure 90 - The Read Routine 



word to be transmitted to or from the disk, and if it 
exceeds the maximum assigned to the lOD, fakes an 
EPGK interrupt. If the disk arm is not properly 
positioned, the locate routine (KKLOC) performs a 
set up locate and ultimately returns to the status 
evaluation routine. Otherwise, the unit status table 
is updated if necessary, and control given to the status 
evaluation routine (ZSTEVL). The status evaluation 
routine will return to the instruction following the 
last branch in the branch table (SEVLTB). For tape 
equipment, after return from status evaluation, the 
tape label is passed if necessary. Then, for card 
and tape equipment, a check is made of the mode 
selected (KTESTM). The read is set up and per- 
formed, control bits adjusted, and control given to 
the I-O reject routine (MIOREJ) with return set to 
the service op return routine, KSUPP. 

When a read request for the console is given in 
response to a console channel signal, a hardware 
read is not performed. The status evaluation routine 
finds the bit SCNSSG on in the unit status table and 
enters PCSRD, the routine specified by the branch 
table. The hardware read instruction was previously 
performed by MCP in order to identify the owner of 
the channel signal. The routine at PCSRD moves the 
information previously read according to the control 
word specified, turns off SCNSSG, and fakes an EOP 
interrupt by entering the receptor at KGATE. Since 
it does not return to status evaluation, control is not 
returned to the read routine, and a hardware read 
instruction is not performed. A console read request 
which is not in response to a channel signal will 
result in a hardware read instruction being performed 
(SCNSSG is off) . 

The Write Routine 

The write routine is entered at EWRl (Figure 91). 
The control word is checked using the control word 
check subroutine (BCWCR), and SEVLMK and 
SEVLTB are set in the unit area table for subsequent 
entry to the status evaluation routine. The mask and 
table for the write routine are designed to check unit 
select and label verification. The channel operating 
bit (SCHOP) is turned on in the channel status table, 
and the routine branches depending on equipment 
type ($4). For tape and console equipment, it enters 
the status evaluation routine and for disk equipment 
it enters the special routine, ZDISKl. (See the Read 
Routine.) If the equipment is the printer, control is 
given to EWR31 , where the write is performed. If 
the equipment is the card punch, EMODE is entered 
to check the mode selected before giving control to 
EWR31 to perform the write. 



When the control is returned from status evaluation, 
EWR31 is entered if the equipment is disk or console. 
If the equipment is tape, and the label specified pro- 
tected, an EPGK interrupt is faked. If the tape is 
positioned at the label, the label is passed, and con- 
trol given to EMODE. At EMODE, the file mode is 
checked and changed if necessary. For tape, an 
erase gap operation is performed, if one had been 
requested, before giving control to EWR31 to per- 
form the write. 

At EWR31, the write operation is set up and per- 
formed, and the control tables are updated. The 1-0 
reject routine (MIOREJ) verifies acceptance of the 
write, and control is returned to the requestor via 
the service op return routine, KSUPP. 

Copy Control Word 

The copy control word routine is entered at BCCWR 
(Figure 92). If the requestor is PP, the specified 
address is checked to see whether it is a full word 
within PP bounds; if not, dispatcher error control is 
entered. 

The control word is copied from the file area table 
under the following conditions: 

1 . The channel is not operating and the unit is not 
a card reader. 

2. A non-disk channel is operating with a logical 
unit other than the requested one. 

3. The requested unit is operating on a set up I-O 
instruction. 

If the unit is a disk and the channel is operating, an 
enabled loop to the actuating address is set up via 
KCBUSY. If the unit is a card reader, or if it is the 
selected unit on an operating channel, a hardware 
copy control word instruction is executed. It is 
repeated twice in the event of exchange rejects. 
Control is returned to the requestor via the service 
op return routine, KSUPP. 



Write Tape Mark 

The write tape mark routine is entered at EWTl 
(Figure 93). The routine adjusts the return address 
in STIC, and checks to see that the equipment is tape, 
faking an EPGK if it is not. An EPGK is also faked 
if the tape label has specified a file protected reel. 

The status evaluation routine is used to select the 
unit and verify the tape label, if necessary. A tape 
mark is written, first passing over the label file or 
erasing gap if required. Control is given to the I-O 
reject routine (MIOREJ) with return set to the service 
op return routine, KSUPP. 
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Figure 91 - The Write Routine 
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Locate 



Release 



The locate routine serves two distinct functions: 

1 . Locates the disk when requested by the locate 
pseudo-op. 

2. Locates any unit required to perform another 
pseudo-op. 

All locate operations for the disk are performed 
as non-SEOP set up I-O instructions. All locate 
operations for other equipment are performed as 
SEOP. 

The Locate Subroutine, KLOCAT: The locate instruc- 
tion is performed by the routine starting at KLOCAT 
(Figure 94). This routine performs a non-SEOP 
locate for disk equipment, turning on the set up I-O 
bit and presuming that SRETAD has been preset in 
the control tables, and finally exiting to KSUPP. For 
non-disk equipment, the KLOCAT routine performs 
a SEOP locate, waits for its completion in the SEOP 
test routine (KSEOPT), and exits to the preset 
return address. 

The Locate Pseudo-Op: When the pseudo-op locate 
is requested, the routine is entered at KSLOC (Fig- 
ure 94) from the identifier. This routine checks the 
legality of the request, faking an EPGK if the equip- 
ment is non-disk, or if the arc address is illegal. 
If it is disk and the arm is already positioned at the 
desired arc, it bypasses the locate and fakes a 
channel signal. Otherwise, it stores KMOON in 
SRETAD, and enters the KLOCAT routine. 

When the interrupt from the locate occurs, the 
routine at KMOON is entered. It checks for a suc- 
cessful locate, attends to necessary bookkeeping, and 
fakes a channel signal by appropriate entry to the 
receptor. 

Set Up Locate Instructions: The KLOCAT routine is 
used as a subroutine whenever a set up locate is 
required by another actuator routine. If the status 
evaluation routine is not being used, KLOCAT may 
be entered with the linkage SIC.KLOCTD; B, KLOCAT, 
with index registers set as usual for actuator routines 
and non-disk equipment. If the status evaluation 
routine is being used, the appropriate entry in the 
branch table should be B,KKLOC, where the routine 
at KKLOC sets the KLOCAT return to ZSTEVL, and 
sets SRETAD in the event the equipment is disk. If 
the equipment is not disk, KLOCAT will perform a 
SEOP locate, check it, and return to ZSTEVL. If 
the equipment is disk, KLOCAT will perform a set 
up non-SEOP locate, and return to KSUPP. The sub- 
sequent interrupt will return to KKLOC, where nec- 
essary disk bookkeeping will be performed prior to 
return to ZSTEVL. 



The release routine is entered at WREL (Figure 95). 
It adjusts the return address, and if the channel is 
operating with the specified unit in select, sets the 
release status bit, and returns via KSUPP. Other- 
wise, an EOP is faked for the release by appropriate 
entry to the receptor. The routine does not use a 
hardware release instruction. Release functions are 
performed by the receptor. 

Feed Card 



The feed card routine is entered at WFC (Figure 95). 
It adjusts the return address, and, if equipment other 
than punch is specified, fakes an EPGK by appropri- 
ate entry to the receptor. The routine updates the 
control tables, performs a feed card instruction, and 
returns via KSUPP after verifying that the exchange 
accepted the instruction. 

Erase Long Gap 

The erase long gap routine is entered at EELG (Fig- 
ure 98). It adjusts the return address, and fakes an 
EPGK if equipment other than tape is specified. The 
routine sets the erase gap status bit, and exits to 
W23K in the release routine to fake an EOP. The 
erase gap instruction is not given until the next write 
is requested for the unit. 

The Space Routine 

The four spacing pseudo-ops are handled by one 
spacing routine. There are four entries to the 
routine, one at each full word starting at Rl (Figure 
96). Each entry selects the proper control code for 
the pseudo-op requested, and enters the common 
routine (R2). 

If the equipment is not tape, an EPGK interrupt is 
faked. The status evaluation routine is used to locate 
the unit and verify the tape label, if necessary, and 
the tape position is examined. If the tape is posi- 
tioned at the label and a backspace operation was 
requested, an EPGK interrupt is faked. Otherwise, 
the label is spaced over, and the spacing operation is 
performed. The control tables are updated, and con- 
trol is returned via KSUPP after verifying that the 
exchange accepted the command. 

Unload 



The unload routine is used to perform the unload 
pseudo-op, and is also used by the free and verify 
routines for unload set up operations. It is entered 
at ZUNLDB when the unload pseudo-op is requested; 
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Figure 94 - The Locate Routine 
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Figure 95 - The Release Feed Card Erase Gap Routine 
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at KHITET from the verify routine, and at KUNLDl 
from the free routine (Figure 97). 

The unload is always performed in the SEOP mode, 
since the EOP would normally occur when the 
exchange accepts the instruction. The channel signal 
occurring when a new tape is mounted is given to the 
user or the actuator, according to the SEOP and set 
up controls in effect. 

When the unload pseudo-op is requested, the routine 
(ZUNLDB) uses the subroutine ZCOMRT to adjust the 
return address , check for tape equipment, adjust the 
control tables, and set up for and enter status evalua- 
tion. The routine then sets up a mount message and 
updates the reel table. The message is modified 
(KRITET) to specify either the required reel number 
or a scratch tape. 

If the new reel is to be file protected (KUNLDl) , 
the message is changed accordingly. The absolute 
channel and unit numbers are placed in the table, and 
an unload (SEOP) performed. The I-O reject routine 
(MIOREJ) is used to perform retries if necessary, 
and the SEOP test routine (KSEOPT) entered to wait 
for EOP. 

When the operation has been accepted, the mount 
message is typed and control returned via ICSUPP. 
When the routine is entered at KRITET or KUNLDl 
by verify or free, the setup bit and SRETAD must 
have been set, in order for control to return to these 
routines when the channel signal occurs. 

The Rewind Routine 



The rewind routine is entered at ZREWST (Figure 97) 
when the pseudo-op is requested. After attending to 
bookkeeping, a rewind SEOP is performed. The I-O 
reject (MIOREJ) and SEOP test (KSEOPT) routines 
are used, and when the instruction is accepted, con- 
trol is returned via KSUPP. When the rewind is com- 
plete, the channel signal will be given to the requestor. 

Unit Lights 

The unit lights routine is entered at separate points 
for each of the light pseudo-ops (Figure 98): 
Pseudo-Op Entry Point 



$KLN 


Check light on 


BKLNR 


$RLN 


Reserve light on 


BRLNR 


$RLF 


Reserve light off 


BRLFR 


$TIF 


Tape indicator off 


BTIFR 



Each selects the appropriate control codcand enters 
the common routine at BTFOK. The routine fakes an 
EPGK interrupt if tape equipment is not specified for 
the TIF operation, or if disk or tape equipment is 
specified for the other operations. The control tables 
are updated, the tape unit is selected if necessary. 



and the control operation is performed. Control is 
returned via KSUPP after using the I-O reject routine 
(MIOREJ) to verify acceptance of the instruction. 



Gong 

The gong routine is entered at WGONG (Figure 98). 
An EPGK interrupt is faked if equipment other than 
console is specified. The routine updates the control 
tables, performs the sound gong instruction, and uses 
the I-O reject routine (MIOREJ) to check acceptance. 
Control is returned via KSUPP. 

Actuator Subroutines 



Subroutines are used to perform functions common to 
several actuator routines. Most of the subroutines 
assume that index register 4 and 10 through 13 con- 
tain the same information as when control is received 
from the identifier. 

Control Word Check 

The read and write operations use control words, with 
the location of the first control word given in the 
linkage. These are hardware control words, and, 
for PP requests, must meet the following specifications: 

1 . They must be in PP storage when the operation 
is started. 

2. They must not cause reading or writing out of 
PP bounds. 

3. The chain bit in the last control word must be 
zero. 

The control word check subroutine checks the con- 
trol words specified, and makes the appropriate entries 
in the control tables. The control word check routine 
(Figure 99) is entered with the calling sequence SIC, 
BIRA; B, BCWCR, with the location of the first con- 
trol word in the VF of $0. The routine performs the 
necessary checking for PP request, entering dis- 
patcher error control with error code 7 in $14 if the 
control word(s) are not correct. At JPICKl, the 
control word information is placed in the control 
tables, and the routine returns to the preset address. 

Status Evaluation 

The status evaluation routine checks the status of the 
requested unit against a desired status provided by 
the requesting program. It is entered at ZSTEVL with 
the location of a status evaluation mask in SEVLMK 
in the unit area table, and the first location of a table 
of branch instructions in SEVLTB in the unit area 
table. The table of branch instructions consists of a 
half word branch instruction for each one in the mask. 
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Figure 97 - The Unload and Rewind Routines 
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Figure 98 - The Unit Lights and Gong Routines 
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Figure 99 - The Control Word Check Routine 



The status evaluation routine perforins an AND opera- 
tion with the half word mask and the second half word 
of the selected unit status table, and enters the branch 
table at a position corresponding to the first masked 
status bit which was on. Thus, the routine performs 
the specified status test, and if the masked status bits 
are not all off, enters the proper routine to correct 
the status. These routines perform the required 
function, turn off the status bit, and return to status 
evaluation. When all the masked status bits are off, 
the routine branches to the instruction following the 
branch table. 

For example, the write routine requires that the 
unit be selected, and the tape label verified. It enters 
the status evaluation routine with EMKIA in SEVLMK 
and EWR18 in SEVLTB. These are defined as: 

EMKIA VF, (8)3000 

EWR18 B, KKLOC 

B, RVFY 

EMKIA has ones corresponding to the bits SSEL 
and SVER in the unit status table. Thus, if the unit 
is not selected, KKLOC will be entered to perform 
a locate, and if the label is not verified, RVFY will 
be entered, prior to performing the requested write. 
The status test for the various pseudo-ops is pre- 
sented in Figure 100. 



Pseudo-Op 
Requested 


SSEL 


SVER 


SCNSSG 


Read 




KKLOC 


RVFY 


PCSRD 


Write 




KKLOC 


RVFY 




WEF 




KKLOC 


RVFY 





mark, and space pseudo-ops, when the verify bit in 
the unit status table is on. If the reel card specified 
an unlabeled tape, the label mode and density are set 
to the installation mode and density, the verify bit is 
reset, and control returned to status evaluation 
(ZSTEVL). The label mode and density must be set 
up even when there is no label, because they will be 
used in the event the lOD specification for mode and 
density is null. 

If the tape is a labeled tape, a set-up read is per- 
formed and control is returned to the requestor via 
KSUPP. When the interrupt from the label read is 
received, the verify bit is reset, and for non-MCP 
units the label is compared with the reel card speci- 
fication. If they do not compare (RV3SCR) and a 
scratch tape is being requested, the pseudo-op is 
examined. If it is write or write tape mark, the 
write label routine is entered (KWLABL). Other- 
wise, an EPGK is faked, since the first operation 
on a scratch tape must be a write. If a scratch tape 
is not being requested, the tape is unloaded and the 
operator requested to mount the correct tape. This 
will be done only once for a PP tape. 

If the label compares, or if the tape is an MCP 
tape, the pseudo-op is examined. If it is write or 
write tape mark, control is given to KWLABL to 
write the label and ultimately return to status evalua- 
tion. If the mode specified by the label is null, the 
tape is unloaded and the operator is requested to 
mount another tape (KRELOD). If the label mode is 
not null, the unit area table is updated and control 
given to the space label at KSPTM with ZSTEVL set 
as the ultimate return in scratch pad memory 
(SSCRPM) . 



Space KKLOC RVFY 

REW, Unload, Free KKLOC 

Figure 100. Branch Table--Address Status Bit Tests 



Note that the control linkage used with the status 
evaluation routine permits returning control to the 
requestor after initiating a setup I-O operation. Since 
SRETAD is set in the unit status table on set up I-O 
operations, control will be returned to the proper 
unit by the receptor to continue processing the request. 
Furthermore, intermediate I-O requests on other 
units may use the status evaluation routine while a 
set up I-O is in progress. 



Write Label 

The write label routine is entered at KWLABL (Fig- 
ure 102). It is used to write a new label on a tape 
prior to the first write operation for that tape. It is 
assumed that the tape is positioned between the label 
and the following tape mark. 

If the reel card specified a file protected tape, an 
EPGK is faked. Otherwise, the routine does three 
setup I-O operations: a backspace, a write label, 
and a write tape mark. It writes the label in its 
density and mode, and the tape mark in the density 
and mode specified for the file. It returns control, 
via KSUPP after each I-O operations, and when the 
tape mark has been written the routine returns to 
status evaluation (ZSTEVL). 



Verify 

The verify routine is entered at RVFY (Figure 101) 
during status evaluation for read, write, write tape 



Space Label 

The space label routine is entered at RSIFLK (Fig- 
ure 103). It is entered from the verify routine at 
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Figure 101 - The Verify Routine 
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Figure 102 - The Write Label Routine 
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KSPTM. The space label must be performed in two 
operations, one to space the label block, and one to 
space the label tape mark, since the tape mark is 
written in the file density which may differ from the 
label density. The sign of the file count is used to 
distinguish whether the tape is positioned at the 
beginning (file count minus zero) or end (file count 
plus zero) of the tape label. If the label must be 
passed, a set up I-O space block operation is per- 
formed in the density of the label, and control 
returned via KSUPP. When the interrupt occurs, the 
density is changed to the file density (KSPTM) and a 
set up 1-0 space file operation performed. When the 
interrupt for the space file occurs , control is 
returned to the location specified in scratch memory 
in the UAT, SSCRPM. 

Set Density 

The set density routine is entered at KDENST (Fig- 
ure 104) with the desired density code in the VF of 
$1 and the return address in SRETAD. The routine 
returns immediately if the unit is in the desired den- 
sity. Otherwise, a set up change density operation 
is performed and control returned via KSUPP. The 
density codes are: 

I Low 

High 

Change Mode 

The change mode routine is entered at KMODE (Fig- 
ure 104) with the code for the desired mode in the 
VF of $1 and the return address in KKMODE. If the 
unit is set to the desired mode, the routine returns 
immediately. Otherwise, a SEOP change mode 
instruction is set up and performed, and the SEOP 
test routine, KSEOPT, used to wait for its comple- 
tion. Control is then returned. The mode codes are: 

01 ECC odd 

10 No ECC even 

II No ECC odd 

I-O Reject Test 



routine (KSEOPT) for SEOP I-O instruction, and by 
the I-O indicator check routine (KIOIND) for non- 
SEOP set up I-O Instructions. The following code 
might appear following a SEOP set up I-O instruction: 

LVI, 1, KSEOPT 
SIC, KEOPR 
B, MIOREJ 
(return at EOP) 
for non-SEOP setup I-O, this code might appear: 
LVI, 1, KSUPP 
SIC, SRETAD($12) 
B, MIOREJ 
A SIC, KKIND 

B, KIOIND 
In this case, control is returned to KSUPP by 
MIOREJ and to A by the receptor when the interrupt 
from the set up I-O occurs. 

EOP Test for SEOP I-O 

The SEOP test routine (KSEOPT, Figure 106) is used 
to wait for completion of a SEOP set up I-O opera- 
tion. The routine is entered with the linkage: 

SIC, KEOPR 

B, KSEOPT 
or its equivalent (see the I-O reject routine, MIOREJ). 
The routine copies the control word repeatedly until 
the SEOP bit is off, returning when all indicators are 
off. If other indicators are on when SEOP is off, the 
channel is cleared and the operation repeated, unless 
the indicator is EE on a locate or a mode change 
operation. Since the EE indication results when 
these operations are performed while the tape indica- 
tor is on, the EE indication is ignored. 

If it is necessary to repeat the operation, control 
is given to KRETRY with the VF of $1 still containing 
the return address just used by the I-O reject routine 
MIOREJ. Thus, the operation wiU be repeated and 
KSEOPT entered again. A count is set up by MIOREJ 
in $11 to limit retries. The counting is done at 
ZTSEOP. 

I-O Indicator Check 



The I-O reject test routine is entered at MIOREJ 
(Figure 105) with the return address in $1 and the 
I-O instruction in SIOINS in the unit area table. The 
function of the routine is to test indicators EKJ, 
UNRJ and CBRJ after an I-O instruction to determine 
its acceptance, and to retry it if it is rejected. The 
routine will return to the address specified if the 
instruction is accepted. If the instruction is not 
accepted after a number of retries, dispatcher error 
control is entered. 

When the MIOREJ routine is used after set up I-O 
instruction, it is always followed by the SEOP test 



After a non-SEOP set up I-O operation, the I-O indi- 
cator check routine (KIOIND, Figure 107) is used to 
test the EPGK and UK indicators. If both are off, it 
returns; if either is on, the routine determines the 
nature of the I-O operation and initiates a series of 
retries , ultimately returning or entering dispatcher 
error control. The five main paths (Figures 107, 
108) through the routine are: 



1. KKSPAC 

2. KLABWL 

3. KRREAD 



Space file failure 
Write label failure 
Read label failure 



Service Routines 
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Figure 103 - The Space Label Routine 
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Figure 104 - The Check Density, Check Mode Routines 
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Figure 105 - The I-O Reject Routine 
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Figure 106 - The SEOP Test Routine 
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Figure 107 - The I-O Indicator Check Routine - Chart 1 



4. KRWEF Write tape mark failure 

5. KREPET Locate or change density failure 
Each path uses some of a set of specialized small 

routines to perform the retry. The routine at 
JNEWTE (Figure 109) is used if it is necessary to 
unload a tape and try a new one. The routine at 
JWRITL (Figure 110) is used when a write label 
operation fails , or when a rewrite of the label is 
required. The short subroutines JBSPE, KIOREJ, 
JSEOPT, KKEOP, and KKDENS have the following 
functions: 

JBSPE Backspace the tape over the label to the 

load point. 
KIOREJ Retry an I-O operation and verify its 
acceptance by the exchange and unit. 
JSEOPT Continually copy control word until the 
SEOP bit is off (all retries are SEOP); 
then check the indicators and return 
accordingly. 
KKEOP A common routine to retry control 

operations. 
KKDENS Verify that the unit is in the desired 
density, and change density if nec- 
essary. 
In addition, the subroutines, KKLOOP, KRETRY, 
and KCLEAR in the 1-0 reject routine (MIOREJ) are 
utilized. 

In attempting retries due to an initial EPGK or UK, 
there are many occasions for additional errors to be 
detected. In general, error indications are tested 
throughout a retry attempt, and dispatcher error con- 
trol is entered if the original or any subsequent 
operation cannot be successfully performed. 

SYMBOLIC I-O CONTROL ROUTINES 

Three service pseudo-ops are provided for flexibility 
in the use of symbolic I-O: 

$IODEF — I-O definition report 

$CHEX — Change table of exits 

$FREE — Free a tape unit for other assignment 
All are entered in the disabled mode from the identi- 
fier with the index registers set as specified in table 
AM (The Identifier Routine - Interrupt Control) . 



I-O Definition Report 

The I-O definition report routine (JZIOR, Figure 111) 
obtains the storage address from the'linkage, con- 
verts the channel and unit numbers to IQS, and stores 
them in the specified location. If $AD or $USA come 
on while computing the storage address, control is 
given to dispatcher error control (SDISP) with error 
code 9 in $14. Return is made to KSUPP. 



Change I-O Table of Exits 

This routine is entered at CCHEX (Figure 111) when 
$CHEX is requested. The location of the new TOE is 
loaded into the CF of $0. If $AD or $USA occurred, 
dispatcher error control (SDISP) is entered with 
error code 9 in $14. If PP boundaries are in effect 
(the boundary control bit, 3.57=1), the new TOE 
address is compared to see whether it is within the 
bounds, and if not, dispatcher error control is 
entered with type 11 error. The new TOE is stored 
in the file area table, and return is made via KSUPP. 

Free Routine 

The free routine is entered at ZFREE (Figure 112). 
If another unit on the channel is operating, an enabled 
loop to the linkage is set up via KELOOP and KSUPP. 
If the channel specified by the $FREE is operating and 
the I-O set up bit is on in the UST, the same enabled 
loop is entered. If the unit is operating on a non-set 
up request, the set up I-O bit is turned on and the 
return address (SRETAD) set in the UAT as Z ZFREE. 
Normal return is made via KSUPP. 

If the channel is not operating, or when the setup 
I-O operation is complete, the routine continues at 
ZZFREE. The routine at' ZCOMRT is used to per- 
form error checking and to control status evaluation, 
and the unit not-assigned bit (SUNASG) is turned on 
in the unit status table. If the tape is not to be saved 
and is not file protected, it is marked as scratch and 
exit is made through the rewind routine. Otherwise, 
the appropriate "save" or "do not save" message is 
set up and exit is made through the unload routine. 

INTERRUPT MODE CONTROL ROUTINES 

The service-ops $SIO, $RIO and $WAIT are used to 
control stacking, releasing, selection, and synchro- 
nization of I-O interrupts. The routines operate 
disabled and are entered from the identifer. 

SIO and RIO Routines 

The SIO routine is entered at KSIO. It identifies the 
requestor by the status of the level bit (SL) and turns 
on the SIO bit (SSIO) in the corresponding program 
status table (SPROGS). It adjusts the address in 
STIC, and returns via the service op return routine 
(KSUPP). 

The RIO routine is entered at KRIO (Figure 113). 
It turns off the SIO bit (SSIO) in the requestors pro- 
gram status table (SPROGS) , and if the requestor is 
auto-stacked or has no interrupts stacked, returns 
via the service-op return routine (KSUPP). Other- 
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Figure 108 - The I-O Indicator Check Routine - Chart 2 
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wise, low registers are saved in SLRPP or SLRMCP 
according to the level of the requestor, and control 
is given to the unstack routine (KUNSTC) to release 
the first stacked interrupt. 



stream, SINTAD is cleared in the file area table, the 
SEWAIL bit is turned on in the file area table, and 
the address of the file area table is placed in the pro- 
gram status table before returning. 



Wait Routine 

The wait routine is entered at KWAIT when the 
pseudo-op $WAIT is requested. It exits to one of the 
following: 

KINTY — The desired interrupt has been found 

stacked, and is being released. 
KSUPP — 1. With STIC set to the actuated address: 
The interrupt has not occurred, and 
an enabled loop to the actuated 
address is in effect. 
2. With STIC set to the return address: 
Either the referenced unit is not 
operating and has no interrupt stacked, 
or the interrupt occurred and was 
released during the enabled loop, 
and the unit was reactuated by the 
fixup prior to issuing $RET. 
In order to avoid waiting twice for a unit reactuated 
by the I-O fixup, the wait-routine issues the following 
controls: 

SINTAD — The interrupted address is set to zero 
when entering the enabled loop ($WAIT 
given in mainstream) . It is set non- 
zero by the receptor when the interrupt 
occurs. 
SEWAIL ,~This bit in the file area table is turned 
on when entering the enabled loop. It is 
turned off when $WAIT is requested by 
mainstream with SINTAD non-zero 
because if it was on, the interrupt 
already occurred in the enabled loop 
and the $WAIT is considered a NOP, 
since it was the return point after the 
fixup. 
When entered, the wait routine (Figure 113) adjusts 
the return address in STIC and sets up $9 for the 
proper program status table (SPROGS). It performs 
the logic described above to discard a redundant entry, 
and determines whether or not the unit specified is 
currently operating. If it is not, a search is per- 
formed for a stacked interrupt for the unit. If a 
stacked interrupt is found, it is released, after 
moving low registers if necessary. Otherwise, the 
address of the file area being waited is cleared in 
the program status table, and control is returned to 
the normal return via the service-op return routine 
(KSUPP). 

If the specified unit is operating, return is made to 
the actuating address via the service-op return routine 
(KSUPP) . However, if $WAIT was issued in main- 



PROCESSOR COMMUNICATION REGION 

When more than one processor is required for a 
compile run, there must be good communication 
among the processors. MCP provides a communica- 
tion region for this purpose, and service pseudo-ops 
to do the fetching and storing required. 

Processing Chains 

A processing chain is a sequence of programs which 
compiles an object program. The type card which 
is included with the input contains a field identifying 
a chain whose components will be called in by MCP 
in the necessary sequence. Links in a processing 
chain have the essential characteristics of a problem 
program and, in addition, they have access to a 
common region wherein they can communicate with 
one another. 1-0 devices are assigned to the entire 
chain so that successive links in the chain may use 
the same devices. 

The LIM card and any lOD cards associated with 
chain are called in by MCP with the first link in the 
chain. The limits become the upper and lower 
boundaries for the entire chain. The lOD's are 
assigned to the chain as a whole and are not dis- 
assigned until the entire chain has been completed. 
Successive links in the chain can thus use the same 
physical I-O devices whenever they refer to the same 
lODNAME's. However, it is the responsibility of 
each link to give to MCP the locations of its I-O 
Tables of Exits. This is done through the pseudo-op, 
$CHEX, Change I-O Table of Exits. 

Input 

The first link in a processor chain may request its 
input from the system input source. When FORTRA>t 
Autocoder, or STRAP 11 is the first processor in the 
chain, input must be requested from system input. 
The first card transmitted will be the card in the 
source program which follows the type of Problem 
card. Successive cards may be transmitted through 
system input until there are no more cards that belong 
to this job. When system input recognizes this, end 
return is given to the processor. If data follows the 
symbolic source program, it is necessary that the 
processing program recognize the last card of the 
source program and terminate its requests to system 
input. Later links in the processor chain may obtain 
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their input from the disk as it is left by a prior link 
in the chain. This information is obtained through use 
of disk I-O pseudo-ops. 

Intermediate Disk Storage 

The disk, except for permanent working storage and 
PROSA, is available to processors for intermediate 
storage and for output to the next link in the chain. 
In the communication region, MCP will enter the 
number of arcs available in this temporary working 
storage. At the end of the chain, MCP expects to 
find in the communication region the number of arcs 
occupied by the compiled program. On this basis, 
MCP can then assign disk areas for the use of the 
compiled program. 

References to temporary working storage by proc- 
essors is made through the disk I-O pseudo-ops 
whose lODNAME is $TWS. This is a permanently 
assigned I-O definition, equivalent to: 

TWS lOD, TRACK 

where the number of arcs which is at the beginning 
of a track is given in the communication region. 

Output 

Print or punch output may be transmitted to system 
output through the use of the appropriate pseudo-ops. 
Systems output must be used to produce the listing 
and punched output. 

Communication Region 

A common communication region is located in core 
storage. It is used by MCP to communicate with the 
processors, by the processors to communicate with 
each other, and by the processors to communicate 
with MCP. The communication region consists of 
25 full words and may be fetched by processors 
through the following linkage: 

B, $MCP 

, $FECRG 

, FWA.(I) 

(return) 
where 

FWA. (1) is the first word (18 bit) address of a 

25-word block of storage in the processor 
to which the entire region is transmitted. 

The current contents of the communication region 
may be replaced by means of the following linkage: 

B, $MCP 

, $STRG 

, FWA. (I) 

(return) 



where 

FWA. (I) is the first word (18 bit) address of a 

25-word block of storage in the processor 
from which the entire communication 
region is transmitted. 

Communication Region Format 

The format of the communication region is as follows: 

0.0 -0.17 Number of links in the chain. 

0.18 - 0.24 Not used. 

0.25 Last link flag. 

0.26-0.31 Not used. 

0. 32 - 0.49 Position number of current link. 

0.50 - 0.63 Not used. 

1.0 - 1. 17 Number of arcs in temporary working 

storage (TWS). 
1.18 - 1.20 Type of run: 

100 Compile 

010 Compile and Go 

001 Go 

1.21 - List option: 

No list 

1 List 

1.22 - Punch option: 

No punch 

1 Punch 

1.23 - 1.63 Reserved for relocation flags. 
2.0 - 2.47 Name of the 1st link. 
2.48-2.63 Not used. 

3.0 - 3.47 Name of the 2nd link. 

3.48 - 3.63 Not used. 

4.0 - 4. 47 Name of the 3rd link. 

4.48-4.63 Not used. 

5.0 - 5. 47 Name of the 4th link. 

5.48 - 5.63 Not used. 

6.0 - 6.47 Name of the 5th link. 

6.48 - 6. 63 Not used. 

7.0 - 7. 17 Number of arcs occupied by compiled 

program. 
7.18 - 7.24 Not used. 

7.25 - Reject flag. 

7.26 - 24. 63 Defined by chain of processors. 
For the BSS processor chain, words 8 through 13 
are defined as follows: 

PP LOWER LIMIT 8.0 

PP UPPER LIMIT 8.28 

ORIGIN OF BLANK COMMON 9.0 
ADDRESS OF RELOCATION TABLES 9. 32 

BRANCH ADDRESS 10.0 

MAIN ENTRY POINT 10 . 32 

ADDRESS OF NODE TABLE 11.0 

MASK FOR LINK TABLE 12. 0-13. 63 
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Communication Region Usage 

The first seven words of the communication region are 
initially provided by MCP, and are used by MCP when 
control is passed from one link to another. If a link is 
to modify any of these seven words, any change must 
be consistent with subsequent usage by MCP (See 
JC4). The use of the remainder of the communica- 
tion region is determined by the requirements of the 
chain. 

The number of links in the chain of processors 
and the position number of the current link are not 
greater than 5. The position number of the current 
link is initially set to 1 and is updated by MCP at the 
end of each link in the chain. The last link flag is 
set to 1 by MCP when the current link is the last 
link. 

The number of arcs (at the beginning of a track) in 
TWS is the number available on the disk to the chain. 
This is not changed by MCP during processing. The 
links in the chain must communicate to other links 
about how this total area is utilized. This may be 
done in the remainder of the communication region. 

The type of run was given to MCP on the type of 
problem card. It is the responsibility of the last 
link in the chain to leave the binary output on the 
disk if the run was Compile and Go and the reject 
flag is not on. 

The list and punch options were given to MCP on 
the type of problem card. These refer to output for 
the problem program via system output and are 
independent of the binary output used for Compile 
and Go. 

The names of the links in (A6) BCD are used by 
MCP to call in the links in the given sequence and are 
put in the communication region for reference by the 
links in the chain. The number of the current link 
acts as a pointer to the name of the current link. 

The nuniber of arcs occupied by the compiled prob- 
lem program must be entered by the last link in the 
chain if the type of problem is Compile and Go and 
the reject flag is not on. MCP assumes that the 
compiled problem program is left in card form and 
may be loaded from the first arc up to and including 
the number of arcs occupied in TWS. This field is 
tested by MCP only after the last link is completed. 
It may be used for inter- communication between 
links as long as the last link enters the number of 
arcs occupied by the compiled problem program. 

The reject flag is set to 1 (on) if the Go phase of a 
COMPILGO job is not to be executed. 

The Service Op Routines for Fetch and Store 

The communication region is stored in MCP at 
KSILO. The service routines for $FECRG and 



$STRG both receive control disabled from the 
identifier. They start at KFECRG and KSTRG, 
respectively, and use a common subroutine, KCAB, 
to set up the transmission and perform error checking. 

Control is given to dispatcher error control with 
error code 9 in $14 if the region specified exceeds 
PP bounds, or if USA or AD occurs while calculating 
the region address. Otherwise, control is returned 
to the parent routine which performs the transmission 
and returns via the service op return routine (KSUPP). 

TIME SERVICE OP ROUTINES 

There are two service ops dealing with time: $TIME 
is a request for the current time clock reading in IQS 
format, and $SIT is a request to set the interval timer 
to a specified value. 

The $TIME Service Op Routine 

This routine will read the time clock, adjust the 
reading by a predetermined calibration constant, 
convert the result into an hours-minutes-seconds 
form, and transmit the result to a requested location. 
The calling sequence is: 
B, $MCP 
, $TIME 
, A. (I) 
(Return) 
where 

A. (I) is the full word (18 bit) address to which the 
edited reading is transmitted. The edited 
reading will consist of 8 IQS-coded characters 
and will occupy A. (I) in the format: 
.0 - . 15 hours 
.16 - .23 colon 
. 24 - .39 minutes 
.40 - .47 colon 

.48 - .63 seconds 
The clock reading is adjusted, and successive 
divisions by 60 are performed to yield seconds, 
minutes, and hours, the first two of which will appear 
in the remainder register. The algorithm is as 
follows: 
T + K = Qs 
Qg 
60" " '5m(AC) + ^(RM) 

^m = Tj + TVf 

60- ^(AC) ^''(RM) 

where : 

T = Current time clock reading (26 bits from 

28-53) 

K = Time clock calibration constant 

S = Adjusted seconds 

M = Adjusted minutes 

H = Adjusted hours 
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AC = Accumulator 

RM = Remainder register 

Upon entry at ZTIME, the routine adjusts the 
return address and calculates the storage address 
from the calling sequence. If an AD or USA occur, 
or if a PP storage address is outside PP bounds, 
dispatcher error control is entered with error code 
9 in $14. Otherwise, the clock reading is converted 
according to the algorithm, and return is made via 
the service op return routine (KSUPP). 

Tlie $SIT Service Op Routine 

This routine is entered disabled from the identifier 
at JSITX. It adjusts the return address in STIC, 
calculates the address of the timer setting, and 
stores the setting in $IT. If AD or USA occurs while 
calculating the address of the timer setting, control 
is given to dispatcher error control with error code 
9 in $14. Otherwise, return is made via the service 
op return routine (KSUPP). 

THE COMMENTATOR 

The commentator service routine is entered from the 
identifier when the $COMM pseudo-op is requested. 
It may also be entered by a disabled MCP user, and 
from the receptor when a commentator output opera- 
tion is completed. The function of the commentator 
is to type messages of up to 10 words in IQS code on 
the console typewriter. 

The commentator write operation is performed as 
setup I-O. The console may be used in a PP lOD, 
and is used in an MCP lOD by the debugging package. 
Thus, the commentator may receive a request and 
find the console busy with an unrelated operation. 
The commentator must then be prepared to take over 
the console, stack another user's interrupt, attend 
to its own function, and arrange the eventual unstacking 
of the original user's interrupt. 

Main Flow 



The commentator program uses a series of sub- 
routines. It is entered at JCOMM (Figure 114) 
when the pseudo-op $COMM is requested, and at 
MCOMD when being used by a disabled MCP program. 
In the latter case, the linkage is: 

SIC, SCOMIC 

BD, MCOMD 

(parameters as for $COMM) 

The program uses two bits to identify the entry. 
It also uses another bit to inhibit return until all 
output is complete, and one more bit to indicate that 
it was necessary to stack console interrupts. These 
bits are: 



JIF 



JRECEP 
1 



JWAIT 







JSTACK 
1 



entry from enabled user (through 

IF analyzer), 
entry from disabled user, 
entry by requestor, 
entry from receptor on completion 

of I-O operation, 
do not wait to perform output if 

another commentator output is 

in progress and there is room 

to stack this request, 
do not return until the stack buffer 

is empty, 
no outside interrupts were stacked, 
console interrupts have been 

stacked. 



When a request is received from a disabled user 
(MCOMD) , the JIF and JWAIT bits are set to identify 
the entry and to force completion of the output before 
returning. When a request is received from an enabled 
user (JCOMD), the JIF and JWAIT bits are reset to 
identify the entry and to permit stacking the request 
and returning if a commentator output is in progress. 

The flow for the two entries comes together at 
JJOIN, where the receptor and stack bits are reset, 
and the parameters evaluated. The stacking sub- 
routine, JSTKR is used to stack the message, entering 
dispatcher error control if a PP request had a FWA 
out of bounds. The JDWTST subroutine is entered 
to decide whether or not to write. It will return to 
the write return if: 

1. the commentator has no output in progress; or, 

2. the wait bit is on; or, 

3. the message stack is full, that is, a message 
of maximum length, 10 words, could not be added. 
Otherwise, the subroutine will return to the Do Not 
Write return, which sends control to the exit sequence, 
JTSTEX. 

If the commentator has an output operation in pro- 
gress, MBS Y is entered. Control will ultimately 
return to MCTL when the operation is complete. 
Otherwise, at MCTL, JSTCW is used to set up a 
two-word control word chain, and JIOGO is used to 
perform the write operation and check EKJ and UNRJ. 
If CBJ is encountered, the console was being used by 
another program, and JIOGO returns accordingly. 
Control is given to MPPBSY to wait for the operation 
to finish and stack the resulting interrupt if necessary. 
The write operation is then performed. The sub- 
routine MSETIO is used to update the I-O control 
tables and place MRETAD in SRETAD in the unit area 
table. If the wait bit is on, MBSY is entered to wait 
for the write to finish and, if the stack is not empty, 
initiate another write. If the wait bit is off, control 
is given to JEXITD to return. 
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Figure 114 - The Commentator - Chart 1 



At JEXITD (Figure 115), the program returns to 
KSUPP if entry was from the receptor. Otherwise, 
controls are set, if necessary, to insure unstacking 
of interrupts before returning to PP, and at JTSTEX 
return is m.ade to KSUPP or to MCP according to the 
JIF bit. 

When a commentator I-O interrupt occurs, the pro- 
gram is entered at MRETAD from the receptor. The 
receptor bit is set, the control word copied, and the 
MBSY flow joined at MFIXUP. 

Commentator Subroutines 



There are ten commentator subroutines. All are 
entered with linkage of the general form: 

LVI, XR, (return address or first parameter) 

B, (Subroutine) 
Some have multiple returns, and some require 
parameters either in the linkage or index registers. 
Most are short and straightforward. 

The Stack Subroutine, JSTKR 

JSTKR picks up the request parameters , branching 
immediately to JTSTEX if a zero word count is 
specified. It prefaces all messages with a carriage 
return and all MCP messages with a red $. It checks 
a PP FWA against PP bounds, entering dispatcher 
error control on an error. It checks the word count 
to be sure it is 10 or less, and moves the words to 
the stack. It adds a terminating carriage return, 
stores the new stack pointer (JSTKP), and returns. 

The Write Test Subroutine, JDWTST 

The function of this subroutine is to decide whether or 
not to do a write now. It has two returns, one for 
Write and one for Do Not Write. If the commentator 
has no write operation in progress, or if the wait bit 
is on, it will return to the write return. Otherwise, 
it will select the return on the basis of whether or not 
the stack has room for another message. If not, it 
turns on the wait bit and takes the write return. 

The Control Word Setup Subroutine, JSTCW 

JSTCW stores blanks in the last partial word, if any, 
in the stack. It sets up a control word to type the 
stack from the word specified by the write pointer to 
the word before the one specified by the stack pointer. 
This control word will be the second of a chain of two. 
The first will control writing the display lights as 
most recently used by the debugging package. If the 
resulting word count is zero, the chain bit in the first 
control word is left off. The routine checks the stack 



pointer, turning on the wait bit if there is no longer 
room for one more message, and returns. 

The 1-0 Routine, JIOGO 

The function of JIOGO Is to perform a specified 1-0 
instruction, retry if EKJ or UNRJ occurs, and select 
one of two returns according to whether or not CBJ 
occurs . The routine will retry a EKJ ten times 
before hanging up in a B,$, and will retry a UNRJ 
until the unit accepts the operation. If CBJ occurs , 
the routine will try the operation ten times before 
using the CBJ return. 

The 1-0 Bookkeeping Routine, MSETIO 

This routine is entered after a successful write 
operation. Its function is to update the I-O control 
tables. It should be noted that there are two unit 
status tables for the console. Although the console 
is on a single unit channel, it is treated as two 
logical units, one available for PP and one for MCP. 
The two UST words are consecutive, the first MCP's 
and the second PP's. 

The routine sets up the addresses of the control 
tables, updates as shown below, then returns. 

1. Sets the select bit (SSEL) in the MCP UST, and 
resets the select bit in the PP UST (SSEL + 1.0). 

2. Sets the channel operating (SCHOP) bit in the 
CST, and the set up (SSETUP) and write (SWR) bits 
in the UST. 

3. Stores MRETAD in SRETAD, and the I-O 
instruction in SIOINS in the UAT. 

4. Clears the unit field (SUNIT) in the CST. 

The Wait for I-O Routine, JTERM 

The JTERM routine is used to monitor the completion 
of the current console I-O operation. The routine is 
a copy control word loop which is broken under the 
following conditions: 

1. Ten consecutive EKJ's on a CCW. 

2. EPGK, UK, EE, or EOP occur. 

3. The channel operating bit (SCHOP) is off and 
the commentator is not the source of the operation. 

4. The SEOP bit in the CW if off and the operation 
was a SEOP release by the commentator. 

In case 1, the routine hangs up in a B, $. For the 
rest, the routine (at JFKCS) tests the CS bit in the 
CW, and returns if it is off. Otherwise, it uses the 
KCSIN subroutine in the receptor to stack the CS, and 
returns. 
The Release Routine, JRECLN 

This routine is used to release the console when the 
commentator has retained control until the operation 
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Figure 115 - The Commentator - Chart 2 



is complete. The routine performs a SEOP release, 
uses JTERM to wait for its completion, and returns. 
It will retry the release ten times before hanging up 
if EKJ occurs. 

The Interrupt Stack Routine, MSTACK 

This routine is used to stack interrupts for another 
console used prior to releasing the console for 
commentator use. The routine (MSTACK, Figure 
115) uses the MTABLE routine to set up control table 
addresses, and then determines whether or not the 
interrupts must be stacked, and if so how. 

If the I-O operation was not set up, and if the 
release and SEOP bits are on, no interrupt will be 
stacked. The routine returns after updating the 
tables. If the operation was a conceptor set up opera- 
tion, KSUPP and KCONCP are set to cause the inter- 



rupt to be taken when KSUPP is entered. If the 
operation was SEOP and not set up and the release 
bit is off, the routine returns after updating the 
tables. Otherwise (MSEOPB), the interrupt is 
stacked in the interrupt queue, the stack bit turned 
on, and the routine returns. 

The Table Address Routine, MTABLE 

The MTABLE routine sets up the addresses of the 
CST, UST, UAT, and FAT according to the current 
owner of the unit, and returns. 

The EPGK and UK Fixups, MCHECK 

This routine is entered when EPGK or UK is detected 
after a commentator 1-0 operation. It will count up 
to ten consecutive retries, and then hang up. A suc- 
cessful operation will cause the count to be restarted. 
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DEBUGGING AIDS 



MCP includes four major packages to provide de- 
bugging facilities for the problem program: 

$EDUMP - the error dump routine 

$DUMP - the dump routine 

$HOLD - the instruction counter hold routine 

SDDT - the console debugging package 

These programs include both dynamic and console 
debugging features. (Note: it is recommended that 
the reader review those portions of the MCP Ref- 
erence Manual concerned with checkout facilities 
and console usage. ) 

The $EDUMP is used to override the automatically 
provided dump parameters used when ABEOJ occurs. 
On ABEOJ, Job Control 4 uses the dump parameters 
most recently specified by the $EDUMP pseudo-op, 
or if $EDUMP was not used, JC4 specifies a dump 
in octal-hex format from the PP lower bound to 
the PP upper bound. 

A dump is provided any time $DUMP is requested 
by the PP. The $DUMP routine is used by the 
debugging package to perform dumps which are re- 
quested from the console in checkout mode. The 
console debugging package (SDDT) may be used by 
itself or in conjunction with the $HOLD pseudo-op 
so that the debugging is performed at a particular 
point in the PP. The console debugging package 
may be used to examine the flow of the program, 
change the flow of the program, dump as desired, 
and examine and change words in PP memory. 

THE DUMP ROUTINES 

Of the two dump pseudo-ops, $DUMP and $EDUMP, 
only $DUMP is a bonafide dump request. $EDUMP 
only specifies dump parameters to be used in the 
event ABEOJ occurs. Both routines are available 
to PP which operates in the non-SIO enabled mode. 

The SEDUMP Program 



The $EDUMP program (AEDUMP, Figure.116) 
receives control with the location of a string of 
dump parameters in its tentacle table. The string 
may contain as many as six distinct dump specific- 
ations. The string is examined; if no errors are 
detected, is placed in the JC4 buffer, YEDLL, for 
subsequent use if an ABEOJ occurs. If the location 
of the string or any of the addresses in the string 
violate PP bounds, or if any format specification 
is invalid,' $RET is given and the request effectively 
ignored. 



The $DUMP Program 

The $DUMP routine prints via $SPR a requested 
number of memory locations in a format specified 
by the user. The calling sequence B,$MCP;, $DUMP;, 
FWA(]) specifies the location of a string of 3 half 
word parameters of the form: , A. (I);, B. (I);, 
Format(I), where A. (I) is the first location to be 
dumped, B. (I) is the last location and the format can 
be either octal-hex with or without mnemonics, index 
word or floating point. The format also requests 
panel or no panel and indicates whether or not this 
is the last request. 

The routine is entered at AWDUMP (Figure 117) 
with the tentacle table, PDUMPJ, setup. The lower 
registers are picked up from SLRBU and saved in the 
dump buffer. A check is made on the parameter, 
FWA(l) to make sure it is within bounds if the user is 
a PP. (The user may also be JC4 and the console 
debugging package.) In case of error a panel dump 
is given and control is returned to the PP. 

If the user is the PP a set of dump parameters is 
checked for validity. If A (1) -C SPPLB the pro- 
grammer's lower boundary is substituted for A([), 
or if B(l)>- SMARK the programmer's upper 
boundary is substituted for B(]). If A(I)>-B(I), or 
A(I) = B(I), or if the format is not one of the existing 
formats, only a panel dump is given. Only one sub- 
stitution per dump request for A (I) or B(I) will be 
made. If a second such error occurs in the PP's 
parameters only a panel dump will be performed. 

A check is made on the suppress panel bit and the 
last request bit and corresponding indicators are 
set up within the dump program. The panel is 
dumped, if requested, one line at a time by setting 
up a print image in buffer AMNTOP and writing it 
out via $SPR. After the panel has been dumped con- 
trol is given to one of three format subroutines, 
AOCTLH, AFLPNT, or ANDXWD, which follow the 
basic pattern stated below. Mnemonics are printed 
if requested after each line of octal-hex has been 
printed. 

The print buffer, APCOLl, is initialized with a 
single space carriage control character and a line of 
blanks. Next a check is made for equal consecutive 
memory locations. If more than four are found, the 

message xxxxxx. x TO xxxxxx. x ALL CONTAIN 

is priftted. If fewer than four are found the location 
counter is set up in the print image followed by four 
words of dump. Each line is printed as it is formed 
via $SPR. When the line containing the last location 
requested has been printed, control is either returned 
to the user (at APUMPl) if this was the last request. 



204 



•i IS FHX t) 

UITMIh PP 

«eOLN04f:iE5 



• RESTORE PP * 

.XVINDEX REGISTER • 

» COMPUTE A.II) * 

•FOR ONE REQUEST* 



• SRET » 



COMPUTE B.(l) 

AND FORMAT 

REQUESTED 



• *RE THERE 

AKY ERRORS 

«IK REQUEST 



STORE RECUEST 
IN EOUMP 
BUFFER 



«HAVE THERE 

BEEN SIX 
• REGUEfTS 



HAS THIS 
THE LAST 

REQUEST 



• SET UP * 

* PARA»«ETERS TO • 
•DUMP I/O TABLES* 



«TR*NSfIT BUFFER" 
•TO JCe CONTROL • 
» BUFFER • 



«ii*««»«»tt 



Figure 116 - The $EDUMP Program 
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Figure 117 - The $DUMP Program 



or to the beginning of the dump program (APUML7) 
to pick up another set of parameters. 



Symbol Definitions 



ASPLBI: 

1 - 

ASPUBI: - 

1 

APANEL.19:0 



ANORMP.19:0 



ANDX4.19: — 

1 — 

ADHMN. 19: 1 — 
- 



ACTLBT: - 
1 - 



AFLPTI: - 

1 - 



AHUWD: 



- no substitution for A. (I) has been 
made for this dump request. 

- SPPLB has been substituted for 
A.(T). 

- no substitution for B. f!) has been 
made for this dump request. 

- SMARK has been substituted for 
B.(l). 

- changes instruction at APANEL to 
a B,AFORMT-.32 which causes 
printing of the panel to be sup- 
pressed. 

- changes instruction at APANEL to 
a NOP which causes the panel to 
be printed. 

- changes the instruction at ANORMP 
to a B, APUMP7 which causes only 
the panel to be dumped. 

- changes the instruction at ANORMP 
to a NOP which permits dumping of 
memory in the specified format. 

- the instruction becomes a B, APNLl 
and indicates that ANDXWD is being 
used to dump the panel index regi- 
sters. 

the instruction is a NOP and means 
that ANDXWD is being used for 
index word format, 
a check is made to see if mnemonics 
have been requested. 

- the statement xxxxxx. x TO xxxxxx. x 

ALL CONTAIN is to be 

printed in octal-hex and mnemonics 
are to be suppressed, 
not an octal-hex request, 
used by ACMPB to print out the 
above-mentioned statement in octal- 
hex format. 

not a floating point request, 
used by ACMPB to print out the 
above-mentioned statement in 
floating point format. 

used in the mnemonics routine and 
assumes that the half-word currently 
being processed is a half word 
instruction. 

the half-word currently being proc- 
essed is the second half of a full 
word instruction. 



AEXPF: — used in floating point conversion 

routine to indicate that e5q)onent 
flag was . 
1 — indicates exponent flag equals 1. 

APNLl: 1 — used to tell floating point conversion 

routine that $MR is being dumped 
and that control should be returned 
to APNLl. 

CONSOLE DEBUGGING 

Console debugging consists of stopping the PP, either 
with a $HOLD request or by putting MCP in the check- 
out mode, performing some sequence of operations at 
the console, and restarting the PP. The $HOLD opera- 
tion is used to stop the PP whether or not PP requests 
it, the distinction being that PP can control the loca- 
tion of the stop by requesting $HOLD at the desired 
location. 

The $HOLD Routine 

The $HOLD routine (PHOLD, Figure 118) consists 
simply of a routine which primes itself and issues 
$RET. On initial entry (PP user, not primed), it sets 
the hold bit, PHOLDB. On any primed entry, if the 
bit is on it primes itself and issues $RET. When the 
bit is off on a primed entry, it issues $RET without 
priming itself, thus allowing the return routine to 
consider returning to PP. The PHOLDB bit is only 
turned off by the console debugging program when a 
restart request is received. The initial entry to the 
routine may be a primed entry, the priming being done 
by the console debugging routine, which also turned 
the hold bit on. 

The Console Debugging Package 

The console debugging major package is made up of 
its tentacle table, a main line to handle testing and 
returning, a set of subroutines, and an I-O table of 
exits. The I-O unit is PCDEF2, defined as console 
with TOE PDBEX. The initial entry to the debugging 
package is at the CS entry in the TOE (PDBO, Figure 
112) when the ENTER, END sequence is recognized by 
the conceptor. This fixup reads the console entry into 
the input buffer and primes the debusing package. 
This is the only way in which control is given to the 
debugging package. 

The program (PDBBEG, Figure 119) operates in 
the same memory as JC4, and on initial entry must 
fetch itself from PROSA using the major package fetch 
routine in JC4. The main line of the program consists 
of examining the keys and switches for requests (PDBl) , 
ultimately (PEl) writing to the console displays if 
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Figure 118 - The $HOLD Routine 
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Figure 119 - The Console Debugging Package 



necessary. If a restart has not been requested, the 
program, at PES, turns the hold bit on (PHOLDB) and 
primes $HOLD to insure that control will not return to 
PP. When a restart is requested, the program turns 



off the HOLD light, resets the hold bit, and issues 
$RET. This will break the $HOLD loop and allow 
control to return to PP. The various subroutines 
which accomplish the debugging requests are: 



Return 



Name Function 

PAl Convert an address from four bit decimal 

to binary, rejecting it if any blanks (1111) 
are encountered. 

PEEK Store a quantity of bits in a specified 

location after conversion to binary. 

PH Perform a console write to turn the hold 

light on. 

PDKL Obtain the word requested from PP 

memory and display it on the binary key 
lights, using PLT to test for a legal 
request. 

PSC Change the PP instruction counter if 

(PSC3) requested (SICBU) and (PSC3) set up the 

IC for display. Perform a log entry on 
the typewriter. 

PDUM Convert a dump request to the format 

required by $DUMP, and test its legality; 
use $DUMP to perform the dump. 



Normal 


Error * 


Requestor from 


PERRl 


PA02. 




PEl via PSC. 


PERRl 


Requestor via 




$14. 




PES via PSC. 


PINC 



Requestor via 
$14. 



Requestor. 



PERRl 
PINC 



PMES 



Used by PDUM to log the dump request on 
the typewriter. 



Requestor. 



* PINC and PERRl are error routines which set up the output buffer according to the error condition and 
return to PE4. 
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SUPPORTING PROGRAMS 



The master control program (MCP) is supported by 
update programs and peripheral input/output pro- 
grams. The update programs provide a method for 
maintaining symbolic tape files, and for updating the 
permanent read-only storage area on disk. 

The peripheral input/ output programs prepare 
tape labels and input tapes for use by MCP and pro- 
vide an off-line output medium for MCP. 

UPDATE PROGRAMS 

The update programs consist of two individual pro- 
grams: 

.1401 Symbolic Update Program 

Master System Update Program 
The 1461 Sjrmbolic Update Program allows the 
programmer to update sjrmbolic programs on tape by 
merging files on a master tape with changes recorded 
on cards to generate a new master symbolic tape. 
The Master System Update Program provides a 
means for updating any system program contained on 
the permanent read-only storage area (PROSA) main- 
tained on disk. The program prepares a new IPL 
(initial program load) tape by merging the current 
system on the disk with changes read from system 
input or a specially prepared tape. It also includes 
a means for updating FORTRAN generator libraries. 

Symbolic Update Program (1401) 

Symbolic Update (Figure 120) is a IBM 1401 program 
which aids in maintaining symbolic files. Syntibolic 
files are recorded on tape in column binary format, 
one card per tape record. Each card image has a 
unique identification in columns 73 through 80. The 
first two, columns 73 and 74, contain two alphameric 
characters which identify the file. These characters 
are initially selected by the programmer; any com- 
bination of two characters being acceptable except 
two blanks. Within each file, cards are numbered 
sequentially, starting with 000001 in columns 75 
through 80. These are called their identification (ID) 
numbers. Any number of files may be stored on a 
"master" tape, restricted only by capacity of the 
tape. The logical end of the master tape is indicated 
by a double file mark. 

By means of the Symbolic Update program the 
(current) master tape is read from unit 1 and merged 
with changes read from the card reader. Each file 
is resequenced as it is updated, and a new master 
tape is written on unit 2. Files which are not updated 



or deleted are copied onto the new master tape. 

Each specific updat-e procedure is initiated by a 
control card read from the card reader along with 
new symbolic cards (change deck). Control cards 
are identified by a semicolon (an 11-6-8 punch on 
the IBM 1401) in column 1. The program does not 
look at the contents of tape records (except for ID 
numbers) nor any cards other than control cards. 
Within one update pass, the change deck must be 
ordered according to the current master tape. That 
is, all intrafile changes must be in numerically 
ascending order and changes to various files must 
be arranged in the same order in which these files 
are written on the tape. 

Control cards and intrafile symbolic correction 
cards will be printed on-line as they are read. How- 
ever, the programmer must rely upon the compiler 
output for a listing and for new sequence numbering 
of a file on the new master tape. 

Usage 

Intrafile Changes: Intrafile changes are initiated by 
ALTER control cards, (punched ;ALTER in columns 
1 through 6). In addition, the ALTER card may have 
information punched in columns 10 through 17 and 20 
through 27. 

Case 1 

1 

/ ;ALTER 



When columns 10 through 17 are blank, all change 
cards which follow, up to the next control card, are 
inserted according to their own ID numbers (columns 
73 through 80) . If the change card has no punches 
in columns 1 through 72, then the corresponding 
record on the current master tape will be deleted. 
All change cards after an ALTER card must refer to 
the same file as follows: 

73 



/ jALTER 



JOE 



SAM 



10 



LX,$X10,ABLE 



SX,$X10, BAKER 



AB000023 
AB000046 
AB001057 



Record AB000023 on the current master tape will 
be replaced by the information on the first card. 



Supporting Programs 211 



• START •• 



* INITIALIZE » 
« PRINT HEA0IN6 
.XII AND REAC THE 

» FIRST CARD 



IS THIS 

A CONTROL 

CARD 



PRINT 

ERRCR 
MESSAGE 



» OECIP < 



PRINT 

CONTROL 
MESSACE 



X«LIPDATE SEO. NO. 
•CONVERT TO BIN. 
• WRITE TAPE 



IS THIS 

AN END 
CARD 



• IS THIS • 
AN END PASS 

• CARD • 



«-«-»-«-«—■-•-«-• 
.X* COMPLETE OLD • 

• TO NEW MASTER • 

• TAPE TRAKSFER • 









• ALTB * 




« • 




VES 


•IS CONTROL 

UNDER #LTER 
• CARDS OWN 


•DELETE OR ALTER* 




•OLD MASTER TAPE* 




• ■aa» 


.CNTL 




• KO 


•CARD 




« 



IS THIS 

AN M.TER 

CARD 



« END A 

■URITE ZMO EOF, 
«R«ND NEh HSTR. 
■PRINT END MSG. 



• DECIP •X- 



» ALTA • 
CKTL^-«- •-»-•- •-•-•-• 

..••••READ CARCS AND VX. 
CARD^DELETE OF ALTER* 
•OLD VASTER TAPE^ 



IS THIS 
A FILE 

CARD 



PRINT 
ERROR 
HESSACE 



•UPDATE SEO. NO. 
•CONVERT TO BIN. 
• WRITE 1APE 



COLUMNS 
10 AND 11 
BLANK -fr 



« FILA « 

1— »—•—•—*—•—»-*— • 

.X« IN THIS FILE. «. 

a INSERT CARDS ON* 

* NEW MASTER * 



• SEQ ■ 

•-•-»-•-•-•-•-•-■ 

.X«UFDATE SEQ. KC.^ 

•CONVERT TC BIN.^ 

• WHITE TAPE • 

■•*•«»««•••«••«*• 



• F TLB • 
•-«-•-«-«.•- «-«-«CNTL 

.X^ FIND FILE AND •••••• 

• INSERT CARDS SCARD 
■ ON NEW MASTER • 



-X» OECIP • 



« SEO « 

.•.*UPOATE SEO. NO-^ 
•CONVERT TO BIN.^ 
• WRITE TAPE • 



Figure 120 - The Symbolic Update Program 



Record AB000046 will be deleted. Record AB001057 
will be replaced with the information on the third card. 
Notice that because of the deletion card, SAM will not 
have number 1057 on the new master. The ID 
numbers always refer to the records to be replaced 
or deleted on the current master tape. 



Case 2 



1 



10 



jALTER XXyyyyyy 



When columns 10 through 17 contain an ID number 
and columns 20 through 27 are blank, all change cards 
which follow, up to the next control card, are inserted 
after record XXyyyyyy on the current master tape. 
These cards are automatically given the proper 
sequence numbers and the rest of the file is rese- 
quenced as the file is copied onto the new master 
tape. Information in columns 73 through 80 on the 
change cards is ignored as follows: 

1 10 



jALTER 



DQ000S19 



JOE LX,$X10,ABLE 

SAM SX, $10, BAKER 

The two cards shown will be inserted after record 
000519 in file DQ. 

1 10 20 

jALTER XXyyyyyy XXz22ZZZ 



When columns 10 through 17 contain an ID number, 
and columns 20 through 27 contain another ID number 
within the same file, all records yyyyyy up to and 
including record zzzzzz on the current master tape 
will be deleted and any change cards which follow, 
up to the next control card, will be inserted in their 
place. For this ease a punch option is available. If 
the letters PUNCH appear in columns 30 through 34 
of the ALTER card, the deleted records will be 
punched on-line. 



10 



20 



30 



A 



ALTER 



EEOOOIOO 



EE000327 



INCH 



;ALTER EE000438 EE000445 

JOE LX,$X10,ABLE 

SAM SX,$X10, BAKER 

Records 00100 through 000327 in file EE will be 
deleted and punched on line. Records 000438 through 
000445 in file EE will be deleted and the two cards 
shown will be inserted in their place. 



Note: Any number and type of ALTER controls may 
be used together on the same file as long as they 
referenced the records in that file in numerically 
ascending sequence. 

File Changes: File changes are initiated by FILE 
control cards (punched ;FILE in columns 1 through 
5). Columns 73 and 74 of the FILE card contain two 
alphameric characters to identify the new file being 
read from the card reader. This file will be auto- 
matically sequenced as it is read onto the new master. 
The new file is defined to be all cards which follow 
the FILE card up to the next control card. Any infor- 
mation in columns 75 through 80 of these cards will 
be ignored. FILE cards may also have information 
punched in columns 10 and 11 and columns 20 and 21. 

1 73 

r. 



jFILE 



XX 



When columns 10, 11, 20, and 21 are blank, the 
cards which follow, up to the next control card, are 
written on the new master tape and sequenced starting 
with XXOOOOOl. The current master tape is not 
altered except when the previous control card was an 
ALTER card, in which case, the program will finish 
copying the rest of that file on the new master tape 
before writing the new file as follows: 



73 



r. 



;FILE 



AB 



The symbolic cards which follow will be written 
and sequenced as fUe AB on the new master. 



10 



73 



;FILE 



YY 



XX 



When columns 10 and 11 contain a file ID and 
columns 20 and 21 are blank, the cards which follow, 
up to the next control card, are inserted and 
sequenced as file XX after file YY on the master tape. 
For example: 



10 



/ jHLE 



BB 



-4- 



73 



BC 
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The symbolic cards which follow will be inserted 
as file BC after file BB on the master tape. 



Case 3 



10 



20 



73 



/"file" 



YY 



ZZ 



XX 



When columns 10 and 11 contain a file ID and 
columns 20 and 21 contain another file ID, all files 
YY up to and including ZZ will be deleted, and any 
cards which follow, up to the next control cai-d, will 
be inserted as file XX. For this condition a punch 
option is available. If the letters PUNCH appear in 
columns 30 through 34 of the FILE card, the deleted 
files will be punched on line. For example: 



master tape and a double file mark is written. The 
current master tape is rewound and unloaded, the 
new master tape is rewound, and the program halts. 
This is the normal end card, used in all update 
passes. It may be used as the sole card of a change 
deck to copy the current master tape onto a new tape. 

Case 2 
1. 

;ENDNEW 

A double file mark is written on the new master 
tape; it is rewound, and the program halts. Tape 
unit 1 is not touched. This end card is used when 
creating a master tape for the first time. For 
example: 



10 



20 



30 



/ jFILE 



4- 



73 



;FILE 
jFILE 



;FILE 



AA 
CC 



AD 
CC 



PUNCH 



AA 



CD 



CE 



A new file will be written at the beginning of the 
new master tape as file AA. Files AA through AD 
on the current master tape will be deleted. File CC 
will be deleted and punched on line, and the new files 
CD and CE will be inserted in its place. The second 
FILE card performs adeletion only, and therefore 
columns 73 and 74 may be left blank. The last FILE 
card also contains blanks in columns 10 and 11, 
because the tape is already properly positioned for 
insertion of file CE. 

Note: The alphameric identification for files on 
the master tape need not follow a collating sequence. 
However, such an arrangement is strongly recom- 
mended to reduce errors in arranging the change 
deck. 

End Cards: The last card of the change deck must 



be an end control card and may take one of two forms: 

Case 1 

1 

/ jENDPASS 



The remaining files on the current master rape, up 
to the double file mark, are copied onto the new 



/ iHLE 



73 



jFILE 



AA 



BB 



jENDNEW 

Two files, AA and BB, are read from the card 
reader, sequenced and ccpied onto tape unit 2. A 
double file mark is written after BB. 

Operating Procedures for the Symbolic Update 
Program 

1. The deck consists of the self-loading program 
deck followed by the programmer's change deck of 
control cards, correction cards, and new files. The 
standard 1401 loading procedure is used. 

2. The current master tape is mounted on tape 
unit 1 and the new master tape is mounted on tape 
unit 2. 

Error Messages 

Three types of error messages may be printed on-line 
during the running of a Symbolic Update Program: 
programmer errors, read-write errors, and end-of- 
reel errors. 

Programmer Errors: Upon finding an error in the 
change deck, the program stops after printing out the 
error message, and a rerun is required. One of the 
following error messages may be printed: 

1. CORRECTION CARD MISPUNCHED OR OUT OF 
SEQUENCE. 
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2. DOUBLE FILE MARK. CHECK SEQUENCE OF 
CONTROL CARDS. 

3. CORRECTION CARDS CROSS FILE BOUNDARY. 

4. FILE CARD HAS NO ID IN COLUMNS 73, 74. 

5. FIRST CARD IS NOT A CONTROL CARD. 

6. ILLEGAL CONTROL CARD. 

7. LAST CARD IS NOT AN END CARD. 

Since information on the master tape is written in 
column binary card image, the 1401 program cannot 
check the collating sequence of file ID's nor the 
numerical sequence of records within a file. In order 
to scan the tape the program can only look for an 
equal condition between an ID punched on a card and 
read in column binary, and the corresponding ID in 
column binary on the tape. For example, upon 
reading the control card 



1 



10 



jALTER 



AA000105 



assuming a preceding ALTER in file AA has left the 
current master tape positioned at record AA000200, 
the program will now start reading (and copying) the 
current master tape looking for AA000105. When the 
end of file is reached and AA000105 has not been 
found, the program will print message 1 and halt. 

If a preceding FILE update has left the current 
master tape positioned at the beginning of file BB, the 
program will start searching for file AA. When the 
double file mark is reached and file AA has not been 
found, the program will print message 2 and halt. 

Error message 3 is used in case 1 of an ALTER 
control, where the individual correction cards refer- 
ence more than one file as follows: 

1 10 » 73 



/ ;ALTER 



Hh- 



JOE 



SAM 



LX, SXIO.ABLE 



SX.SXl O.BAKER 



AD00039S 



BB000052 



The other error messages in this category are self- 
explanatory. 

Read-Write Errors: The program provides for auto- 
matic retry on tape errors, and restart procedure on 
card reader errors. Printer and punch errors are not 
checked. One of the following messages may be 
printed: 

1. TAPE CHECK: RECORD ON OLD MASTER WAS 
UNREADABLE AFTER TEN TRIES. 

2. TAPE CHECK: WRITE ERRORS ON NEW 
MASTER. BAD SPOT WAS ERASED. 

3. READER CHECK: EMPTY HOPPER AND FIX 
CARDS FOR RESTART. PUSH START. 



If the current master tape is unreadable after ten 
tries, the program prints message 1 and halts. If the 
new master tape is unwritable after three tries the 
program prints message 2, erases a gap and con- 
tinues. On a reader check, the program prints mes- 
sage 3 and halts. The operators should initiate the 
standard restart procedure. If a reader check is 
encountered while the 1401 program deck is being 
loaded, the error will not be discovered until exe- 
cution time. In this case, message 3 will be the only 
line printed (normally the name of the program is the 
first line printed) and the program will halt. The 
entire deck must then be reloaded. 

End of Reel Errors: If the end of tape reflective spot 
is sensed while writing the new master tape, the 
following procedure is taken: a double file mark is 
written, a card is punched which contains the ID of 
the last file in columns 1 and 2, one of the following 
messages is printed, and the program halts. 

1. LAST FILE ON NEW MASTER IS INCOMPLETE 
CARD PUNCHED. 

2. LAST FILE ON NEW MASTER IS COMPLETE. 
CARD PUNCHED. 

Normally, the last file written will be incomplete 
and message 1 will be printed. The incomplete file 
can be deleted on another pass with a FILE card, and 
the remainder of the current master tape can be 
copied onto another tape by deleting the files which 
were completed. It is possible, however, to sense 
end of reel while writing an end of file. In this case, 
message 2 will be printed. 

Master Update Program (UPDATE- 30) 

The STRETCH programming system is maintained on 
a master tape which is called in at Initial Program 
Load (IPL). The system is transferred to the perma- 
nent read-only storage area (PROSA) on the disk, and 
the master tape is rewound and unloaded. 

The master update program, UPDATE-30, merges 
the current system on PROSA with changes read from 
system input ($SCR) or a specially prepared change 
tape, and the updated system is written on a new 
master tape. If the new master tape is to be used, it 
must then be called in with IPL. 

Master Tape 

The master tape contains two binary files in odd 
parity, high density. The first is a single record 
containing the IPL bootstrap program. The second 
consists of 513-word records each containing an image 
of an arc of PROSA on the disk. Each change affects 
an entire logical unit of PROSA called a type area. 
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HED Control Cards 

Changes to the program are initiated by HED control 
cards punched as follows: 

ji 10 

B HED, operation, ttaaaaaa, LOAD 

The second field (op) may contain one of four opera- 
tion codes: 

DEL delete 

REP replace 

ADD add 

LIB librarian 

The third field (tag name) contains the name of the 
type area on the disk being operated upon. 

The fourth field (LOAD) is optional and only affects 
REP and ADD operations. If present, the deck which 
follows the HED card will be loaded, and the new type 
area will contain the information in memory image. 
Otherwise, the deck will be read, and the new type 
area will be in card image. 

Operation Codes 

The following codes may appear in the second field 
of a HED control card: 

Delete (DEL): The named type area will be 
deleted from the current system. 

Replace (REP): The deck which follows , up to 
the next HED card, will be read or loaded from the 
input source and its contents will replace the named 
type area in the current system. 

Add (ADD): The deck which follows, up to the 
next HED card, will be read or loaded from the input 
source and its contents will be added to the current 
system as a new type area with the given name. 

Librarian (LIB): The named type area specifies 
the generator library to be updated according to the 
control cards and generator decks which follow, up 
to the next HED card. The updated library and its 
associated table of contents, which is a separate t3T)e 
area automatically updated by the librarian, will 
then replace the two corresponding type areas in the 
current system. 

Librarian: The four generator library type areas 
are: LFORTRAN, LPASSONE, LPASSTWO, and 
LSMACONE. The names of their associated tables 
of contents are: TFORTRAN, TPASSONE, TPASSTWC 
and TSMACONE. The library control cards (punched 
starting in column 10) are defined as follows: 

1. SMADDMAC, A 

Adds the following generator to the library, 
naming it "A". The sort field is assigned a 
zero value. 



2. SMREPLAC, A 

Replaces generator "A" with the following 
generator. The sort field remains the same. 

3. SMDELETE, A 

Deletes generator "A" and its synonyms 
from the library. 

4. SMRENAME, A-, B 

Changes the name of "A" to "B". Also 
changes any synonyms of "A" to synonyms 
of "B". 

5. SMYNONYM, A, B 

Arbitrarily assigns generator "A" a sort 
field of "X" for optimal I-O times, where 
"X" is a 4-digit number between 1-1000. 

6. SMARANGE 

Orders the generators by ascending sort 
fields. SMARANGE may not be used during 
an update in which SMADDMAC or SMREPLAC 
have also been used. A zero field has 
highest priority. 

If a HED, LIB card is followed immediately by 
another HED card, the only action taken by the 
librarian will be a review of the contents of that 
library. 

The librarian has its own loader which is restricted 
to standard generator decks, as defined by the SMAC 
language. 



Operating Procedure for the Master Update Program 

UPDATE- 30 operates as an ordinary problem pro- 
gram and is loaded by MCP from the system input. 

The change deck is prepared as follows: The first 
card must be a date card containing xx/yy in columns 
10 through 14, where xx is the current month and yy 
is the current day. It may also have COMM punched 
in columns 2 through 5. (See section on Print-Out). 
Following the date card are the HED cards and new 
decks for all type area changes. 

The change deck may be put on system input 
directly following the program deck, or it may be 
put on a separate tape as a single file, (odd parity, 
high density). For the first option, the third lOD 
card (for the change tape, named CHT) should be 
removed from the program deck to eliminate unnec- 
essary tape mounting. For the second option, a 
REEL card must be added behind the third lOD. The 
program will automatically determine the input source 
by trying, to read initially from the system input 
($SCR). 

The program deck includes lOD and REEL cards 
for the new IPL tape to be written, which is unpro- 
tected, unlabeled, and named NWIPL. 
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Print- Out: UPDATE- 30 will list on system output 
($SPR) the following information: 

1 . A title line including original date of current 
system and current date for the new IPL tape. 

2. HED cards as they appear in the change deck. 
For LOAD options, all T, C, D, and P cards will 
be printed as they are encountered. For librarian 
operations, individual changes and a review of the 
new contents of the library will be printed. 

3. The new MCP dictionary, containing the name, 
arc-word location and size of each type area on the 
disk. 

4. B cards in the IPL program which define the 
individual system configuration. 

5. UPDATE COMPLETED. 

The following information will be printed on the 
console typewriter: 

1 . A title line including original date of current 
system and current date for the new IPL tape. 

2. xxxxxxxx LIBRARY UPDATE WAS SUCCESSFUL 
for each librarian request, where xxxxxxxx is the 
type area name. 

3. UPDATE COMPLETED. 

H the date card contains COMM in columns 2 
through 5 , the following additional information will 
be printed on the typewriter: 

1. Individual changes to each generator library. 

2 . The new MCP dictionary. 

3. B cards in the IPL program. 

Errors: Input-output errors and any detected errors 
in the change deck will cause an explanatory error 
message to be printed on both system output and the 
console typewriter. UPDATE-30 will then be termi- 
nated with an abnormal end- of- job. 

Messages for input- output errors are as follows: 

1. REPEATED DATA ERRORS ON DISK. 

2. REPEATED READ ERRORS ON CHANGE TAPE. 

3. END OF REEL ON NEW MASTER TAPE. 

4. I-O HARDWARE FAILURE. (UNIT) 

Data errors will be retried three times for the 
disk and ten times for the change tape (if used) before 
termination. Data errors in writing the new master 
tape will be retried three times before erasing a long 
gap and continuing. UK without EOP, and EPGK, 
are considered I-O hardware failures. The name of 
the unit (disk, change tape, or new master tape) will 
be included. 

Messages for change deck errors are as follows: 

1. NO INPUT CHANGE DECK. 

2. FIRST CARD IS NOT DATE CARD. 

3. SECOND CARD IS NOT A HED CARD. 

4. HED, IS ILLEGAL. 

5. NO HED CARD AFTER DELETE . 

6. NEW TYPE AREA HAS ZERO WORD 

COUNT. 



7. LOADER REJECTED (reason) 



9. 

10. 



SEQUENCE NO. OF LAST CORRECT BINARY 

CARD WAS . 

The reason for loader rejection will be one 
of the following: 

CHECK SUM ERROR 
SEQUENCE ERROR 
ILLEGAL CARD TYPE 
CARD BELOW 1ST ORIGIN 
DECK EXCEEDED BUFFER 
C OR P CARD MISPUNCHED 
NO ORIGIN ON 1ST CARD 
NO ORIGIN CARD 
BSS FUNCTION ILLEGAL 
TWO HED CARDS HAVE TYPE AREA 

NAME . 

ALREADY ON PROSA. 
, NOT ON 



TRIED TO ADD. 



DELETE OR REPLACE 
PROSA. 



11. FIRST FOUR TYPE AREAS ARE. 



12. TOO MANY TYPE AREAS IN TYPE MAX 

IS 256. 

13. TOO MANY TYPES. MAX IS 40. 

14. CHDIC BUFFER WAS EXCEEDED. 

15. NEW Die BUFFER WAS EXCEEDED. 
Messages 4 through 12 will have specific information 

inserted, in most cases the type area name. Mes- 
sages 5 and 6 refer to the restrictions that a HED, DEL 
card must be followed by another HED card, and a 
HED, ADD card, or HED, REP card must not be 
immediately followed by another HED card. Messages 
11, 12 and 13 refer to MCP restrictions. If the 
sequence of the first four type areas is violated (refer 
to the following section on Notes and Restrictions) , 
message 11 will contain the sequence that was attempted. 
Message 7 wUl contain the sequence number, in octal, 
of the last correct binary card loaded. 

There are three miscellaneous error messages: 

1. UNABLE TO FETCH CURRENT BOOTSTRAP. 

2. UNABLE TO FETCH CURRENT DICTIONARY. 

3. NEW Die IS MISFORMED. PROGRAM OR 
MACHINE ERROR. 

If any of these are printed, either the current sys- 
tem or the program has been contaminated. 

The librarian has its own set of librarian error 
messages for errors in the change deck. They are: 

1. ILLEGAL CONDITION, LIBRARY DOES NOT 
EXIST. 

2. ILLEGAL CONDITION, LIBRARY HAS 
ALREADY BEEN UPDATED. 

3. SMARANGE MAY NOT BE REQUESTED WITH 
SMADDMAC OR SMREPLAC. 

4. PARAMETER ERROR. NOT EXECUTABLE. 

5. LOGICAL ERROR. NOT EXECUTABLE. 
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6. ILLEGAL SITUATION — LIBRARY IS EMPTY. 

7. TABLE OVERFLOW. LIMIT IS 200 ENTRIES 
PER LIBRARY. 

Messages 2 and 6 will include the name of the type 
area, and 4 and 5 will include the library control 
card which is in error. 

An error in loading a generator deck will cause 
the following message to be printed: 

ERROR IN BINARY (reason) 

LAST CORRECT SEQUENCE NUMBER WAS . 



The reasons for an error in binary deck are also 
printed as follows: 

A CARD IS OUT OF SEQUENCE. 

CHECKSUM ERROR. 

BITS TO LOAD GREATER THAN 23 HALF WORDS. 

ORIGIN IS OUT OF RANGE. 

FLOW CARD IS OUT OF RANGE. 

(ORIGIN PLUS MODIFIERS) IS OUT OF RANGE. 

C CARD OUT OF RANGE. 

UNIDENTIFIABLE CARD. 

NO TRANSFER CARD. 

Notes and Restrictions: 

1. If the date card is the only card in the change 
deck, a new IPL tape will be written containing the 
current system without alterations. 

2. The type areas on PROSA are ordered (in BCD 
collating sequence) according to their names. MCP 
requires that the first four type areas be: 

IIAIIDIC 

IIBIIIND 

IICIIIPL 

IIDIIMCP 
The first two (dictionary and index) are auto- 
matically updated by the program. 

3. The IPL bootstrap program, which UPDATE 
writes as the first file on the new tape, is included 
as a type area in PROSA named llfllBSP. It may 
be updated like any other type area in the system. 

4. When the LOAD option is used the deck must 
fit within the buffer, which is 23,040 words (55,000 
octal) in size. For machines with greater than 48K 
storage the buffer may be expanded, with the restric- 
tion that the buffer size is evenly divisible by 15 (card 
size) and 512 (arc size). The program buffer for the 
change dictionary is 1024 words in size and the new 
dictionary is 4096 words. These also may be expanded 
with a re-assembly. 

Program Description 

In essence, UPDATE-30 performs the following tasks: 

1. Reads cards from the change deck, one by one. 

2. Makes change dictionary entries as required. 

3. Merges current dictionary with change dictionary 
to form new dictionary and new index. 



4. Writes new master tape. 

Main Flow: Detailed flow of the UPDATE-30 program 
is as follows: 

UPDATE-30 starts at location 12,400 (octal) 
(STARTA, Figure 121), and the dump limits are set 
for $ABEOJ. The string of control words are set up 
for writing the new master tape. The input source 
is determined, the date card is read, the IPL boot- 
strap is fetched from PROSA for the previous date, 
and the title line is printed. 

At HEDCTL (Figure 122) , the change deck is read 
one card at a time from the input source. For every 
HED card read, an entry (2 words) is made in the 
change dictionary. The deck which follows either a 
HED, ADD card or a HED, REP card is read or loaded 
into the buffer and written on the disk. The word 
count is computed and stored in the change dictionary 
entry. The word count is set to zero for a delete 
operation. When the change deck is exhausted, a 
dummy last entry with type area name )))))))) is 
stored in the change dictionary. 

The READl routine (Figure 123a) reads a single 
card from the input source into the card buffer. The 
card is then checked to see if it is a HED card. The 
READl routine is a closed subroutine. 

The READA routine (Figure 123b) reads a deck 
into the main I-O buffer. When the buffer is filled, 
the contents of the buffer are written on the disk and 
the buffer address is initialized. The routine will 
continue to read the deck until a HED card is read. 
The READA routine is a closed subroutine. 

For a librarian operation two entries are made in 
the change dictionary, one for the library and one for 
its associated table of contents. The library control 
cards are read and each new generator deck is loaded 
into a special buffer by the librarian. The new library 
is written on the disk as it is updated. The new table 
of contents is written on the disk, and the proper 
word count is stored in the two change dictionary 
entries. From this point, these two tjrpe areas are 
treated exactly as if they had been put on the disk by 
two replace operations. See Generator Librarian. 

At ARCNST, the relative arc address of each new 
type area on the disk is computed and stored in each 
change dictionary entry. The computation is made 
by adding the word count of the previous entry to its 
relative arc address and rounding up to the next full 

arc. The first type area starts at relative arc zero. 

At SORT, the change dictionary entries are sorted 
by type area name and checked for the illegal condi- 
tion of two entries having the same name. 

At MERGE, (Figure 124a) the current dictionary is 
fetched from PROSA and merged with the change 
dictionary to form the new dictionary (stored in the 
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NEWDIC buffer). The following illegal conditions 
are checked for: a delete or replace operation for a 
non- existing tj^De area, and an add operation for an 
already existing type area. 

At CHECK, the first four type area entries in the 
new dictionary are checked for the required MCP 
sequence. 

At BSTRAP, (Figure 124b) the new dictionary is 
searched for the IPL bootstrap entry. The bootstrap 
is read from the disk (if new) or fetched from PROSA 
and the current date is inserted. It is then written 
on the new master tape, and followed by an end of 
file. 

At IND, (Figure 124c) the new index is constructed 
and the new dictionary is moved into the buffer. The 
move is made because the MCP requires that the 
entries for any given type must all be contained within 
the same arc of the dictionary, and. that the dictionary 
must occupy an integral number of arcs on PROSA. 
The unused portion of any dictionary arc and any 
unused portion of the new index are cleared. 

At TAAD, (Figure 125a) the size of the new dictionary 
is stored in the first dictionary entry, and the size of 
the new index (set to 40 decimal words) is stored in 
the second entry. The absolute arc-word address of 
each type area as it will appear on the new PROSA is 
computed and stored into each dictionary entry. The 
new dictionary is printed at the same time. The arc- 
word address for the last (dummy) entry )))))))) is 
rounded up to the nearest track address before being 
stored. The new index is moved into the buffer 
following the dictionary. 

At ENTRY, (Figure 125b) the entries in the NEWDIC 
buffer are used to pick up each type area following 
the new index and pack it into the buffer. If the type 
area is new, it is located and read from the disk; if 
not, it is fetched from PROSA. When the buffer 
becomes full, the contents of the buffer are written 
on the new master tape in blocked records, the cur- 
rent buffer position is reset, and the process con- 
tinues (Figure 126a). After the MCP IPL type area 
is brought into the buffer the new PROSA size is 
stored in the proper place and the B cards in the IPL 
program are printed. 

The current date is stored in the bootstrap type area 
after it is brought into the buffer (Figure 126b). When 
the NEWDIC entries have been exhausted, the final 
portion of the buffer is written on the new master 

tape followed by an end of file. The end message is 
printed and UPDATE-30 is terminated. 

Input- Output: UPDATE-30 uses three I-O devices in 

addition to system input, system printer, and MCP 

commentator. They are: the disk, the new master gj^ q ^^ 



tape, and the change tape (optional). The associated 
tables of exits are labeled DSKEX, NMTEX, and 
CHTEX. After activating an I-O device, the program 
always waits for a successful completion before con- 
tinuing. 

The EOP routine for the disk automatically keeps 
track of the current arc location (ARCLOC) in case 
a data error occurs while writing. The disk is 
always located before reading and the new arc loca- 
tion is stored in ARCLOC at the same time. The 
librarian uses special blocking routines for writing 
the disk, and changes the table of exits to PETXIT. 
DSKEX and ARCLOC are properly restored before 
the librarian returns to the main program. 

Error Routines: The error routines are labeled 
ERRl through ERR16. Each routine sets up the 
appropriate message in a print buffer (ERRMS) and 
transfers to location ERRP, which outputs the error 
message. The order of these routines does not 
correspond to the order in which the messages are 
listed in the program description. 

Loader: UPDATE-30 includes a version of the stan- 



dard MCP relocatable loader with modifications. The 
master update program contains a special loader 
which will accept absolute and relocatable decks, but 
not BSS decks. When the LOAD option is used, the 
first card loaded sets the lower bound of the program, 
which will be the first location in the new type area. 
Absolute decks should begin with an origin or C card, 
and relocatable decks with a loader adjustment card. 

The deck may contain B cards (other than JOB, 
COMD, or HED cards) which will be read into the 
load buffer (15 words per card) starting with the 
first full word beyond the highest location loaded at 
that point. Any branch cards in the deck will be 
ignored. The buffer is not cleared before loading. 
In all other respects the update loader operates like 
the standard MCP loader. A detailed write up of 
the MCP loader may be found elsewhere herein. 

System Subroutines: UPDATE-30 uses three stan- 
dard MCP conversion routines: SAxIQS, SCAx, and 
SBRK8, shown on the following page. 

Index and Dictionary Formats: The following para- 
graphs describe the formats for the index, change 
dictionary, and the new dictionary. 
1. Index - the symbol for the new index is 
NEWIND (new index). It consists of 40 words (plus 
a zero word before the table and an extra word at the 
end) . The format for each word is as follows: 



TYPE 




TAWA 
arc 1 word 



32 



M 



TYPNO 



53 56 



63 
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standard Conversion Routines: 
1. BCDtoIQS SAxIQS 



Hollerith to 
BCD- 



SCAx 



Breakdown 



SBRK8 



LVI, 15, $+1. 
B, SAxIQS 
VF, A 
CF, B 
VF, C 
(return) 

LVI, 15, $+1. 
B, SCAx 
VF, A 
CF, B 
VF, C 
(return) 

LVI, 15, $+1. 
B, SBRK8 
VF, A 
CF, B 
VF, C 
VF, D 
B, ERROR 
(return) 



Conversion, "x" may be 6 or 8 for 6 bit or 
8 bit BCD. "A" specifies the input location, 
"B" the number of characters to be con- 
verted, and "C" the output location. 



Conversion, "x" may be 6 or 8 for 6 bit or 
8 bit BCD. "A" specifies the input location, 
"B" the number of characters to be con- 
verted, and "C" the output location. 



Breakup a series of fields separated by 
commas and store them in consecutive full 
word locations. Input is in 8 bit BCD and 
output is 6 bit BCD. Blanks are right 
appended for fields of less than 8 characters. 
"A" specifies the input location, "B" the 
number of input characters, "C" the output 
location, and "D" (set by the routine) the 
number of output characters. 



One word for each type on PROSA . (The first two 
characters in a type area name identify the t3rpe.) 
TAWA is the arc-word address of the first dictionary 
entry for this type. TYPNO is the number of type 
areas within the type. 

2. Change Dictionary - The symbol for this table 
is CHDIC (change dictionary) . It consists of 512 two- 
word entries, with the following formats: 



TYPE AREA NAME 



xx\/ar 

8 50 52 



ARC- 
ADDRESS 



Bit 48 50 

XX = 00 - replace control 
01 - add control 
10 - delete control 



63 



Z::^^~==^ 


SIZE 


S^:=^-^=^^Z^ 



Bit 28 46 63 

One entry (2 words) for each HED card (two entries 
for each HED, LIB card). SIZE is the size of the new 



type area. ARC-ADDRESS is the location of the new 
type area on the disk (filled in by ARCNST routine). 

3. New Dictionary - The symbol for this table is 
NEWDIC (new dictionary). It consists of 2048 two- 
word entries^withthefol^^ formats: 



TYPE AREA NAME 



Bit 



xxw 



ARC- 
ADDRESS 



48 50 52 



63 



ARC- 
WORD 


X 


SIZE 


^:>-<:i 



Bit 21 28 46 63 

One entry (two words) for each type area on the new 
PROSA. ARC- WORD field is zero if this is a new 
type area. XX bits and ARC-ADDRESS are not moved 
when NEWDIC is moved into the buffer. The absolute 
ARC- WORD location of each type-area on the new 
PROSA is stored in the moved and final version of the 
new dictionary, but not in the NEWDIC buffer. 
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Flag Symbols: 

Symbol 

DSKBT 

NMTBT 

CHTBT 

HEDBT 

EOFBT 

DSRBT 
IPLBT 

BSPBT 
FETBT 
COMBT 



Set Means 

Disk in use. 

New master tape being written. 

Change tape being read. 

Card just read in change deck 
was HED card (or EOF condition). 
Change deck - END OF FILE 
condition. 

Disk I-O was a read. 

IPL main program or bootstrap 
is being loaded into the buffer. 

Bootstrap is being loaded into 

the buffer. 

A PROSA fetch has been made. 

On if "COMM" in date card. 



Control 

Turned on before I-O call to DSK. 
Turned off by successful EOP. 
Turned on before I-O call to NMT. 
Turned off by successful EOP. 
Turned on before I-O call to CHT. 
Turned off by successful EOP. 
Turned on in READl routine. 
Turned off by instructions which test it. 
Turned on in READl routine (or EE on 

change tape). 
Turned off by instructions which test it. 
Turned on in mainstream after all disk 

writing has been finished. 
Turned on before ENTRY or in IPL3 routine. 
Turned off by instruction which tests it in 

ENTRY routine. 
Turned on in IPL3. 

Turned on in FETCHO. 

Turned off if "normal" fetch return. 

Turned on when date card is read. 



Generator Librarian 

The librarian section of UPDATE-30 deals with the 
maintenance of the four generator libraries: 
LFORTRAN, LPASSONE, LPASSTWO, LSMACONE. 
It also automatically updates their tables of contents: 
T FORTRAN, TPASSONE, TPASSTWO, TSMACONE. 
The libraries and their tables of contents each 
occupy a type area on disk. 

Generator libraries are composed of variable length 
blocked records, each generator being a record. They 
are blocked in memory image form, after being loaded 
at update time. In the related tj'pe area, the table of 
contents keeps track of the position of each record 
within the generator file and is used by compilers to 
locate generators for expansion of FORTRAN and 
MACRO statements. 

Binary decks of generators to be added to a library, 
or to replace existing generators, follow a control 
card in the change deck. Logical sequencing of 
changes within a library is important if more than 
one operation is performed on a single name. A 
library may be updated only once per update run. 

The updating of a library requires four phases: 

1. Initialization - All control bits are set to zero, 
the table of contents is fetched, and the library name 
is verified and stored in messages. 

2. Read- in of Changes - The control cards and 
binary decks are read, loaded, and blocked on the 
new master file on the disk. Changes are made to 



the table of contents to reflect new record numbers 
within the file: size, number of entries, etc. . Error 
checking is done on the commands and logic to avoid 
duplication, illegal origin or size, etc. . 

3. Merge of Old and New Libraries - At the end- of 
the change file (B card) the old library, minus any 
deletions, is re-blocked after the new generators on 
the disk. Old generators are re-numbered to reflect 
new positions. 

4. Cleanup and Print-out - The new table of con- 
tents is written on the disk, the print-out of the 
changes is made, and the table of contents is written 
on $SPR. Appropriate changes are made to the master 
update change dictionary, and control is returned to 
HEDCTL. 

Errors: Error conditions of any kind terminate the 
update. Information necessary to correct the situa- 
tion is typed and written on $SPR. 

1. SMADDMAC errors 

a. Name too long or blank. 

b. Name duplicated. 

c. Any error in binary deck. 

2. SMREPLAC errors 

a. Name too long or blank. 
Name not in table. 
New library being generated. 
Attempt to replace a new or a replaced 
generator, or any synonym. 



b. 
c. 
d. 
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3. SMYNONYM errors 

a. Parent name too long or blank. 

b. Parent name not present in table of contents. 

c. Synonym too long or blank. 

d. Synonym already in table of contents. 

4. SMUPDATE errors 

a. Name too long or blank. 

b. Name not in table of contents. 

c. Updating a synonym. 

d. Sort field zero or greater than 1000c 

5. SMDELETE errors 

a. Name too long or blank. 

b. Name not in table of contents. 

c. Deleting a new or replaced generator, or 

a new synonym. 

6. SMRENAME errors 

a. Old name too long or blank. 

b. Old name not in table of contents. 

c. New name too long or blank. 

d. New name already in table of contents. 

e. Replacing a new, replaced, new synonym, 

or already renamed name. 

7. SMAR^NGE errors 

Arrange requested during an update which 
included a SMADDMAC or SMREPLAC. 

8. Other Errors 

a. Any command which is not recognized by 

the librarian. 

b. Updating a library which does not exist. 

c. Updating a library more than once per 

update. 

d. Table overflow. The maximum number of 

entries allowed is 200 per library. 

e. The following errors in a binary deck 

(1) Sequence error. 

(2) Checksum error. 

(3) Bits to load on a card greater 

than 23 half-words. 

(4) Origin out of range (not 1000 qq\). 

(5) Flow card out of range (Range is 

1000 to 3045(10)). 

(6) Origin plus modifiers out of range. 

(7) Unidentifiable card - not origin, 

flow, C card, or transfer. 

(8) C card out of range. 

(9) No transfer card. 

Operating Procedures: The program prints the 
sequence number of the last correct binary card 
(Figure 128). Code within the librarian is divided 
into four parts: 

1. Tables, Bits, and Buffers - All permanent 
accumulation of information is maintained in the table 
of contents for eventual replacement of the old table. 
Bits within the table define the type of entry, and bits 



within the librarian record temporary flow and con- 
trol information during an update cycle. 

2. Executive Routines - These routines perform 
the operation necessary to implement a command. 
They provide sequencing through the appropriate 
subroutines, and do the majority of the error checking. 
Return is to RETURN. 

3. Control Routines - These routines provide con- 
tinuity to the library update mechanism; i. e. , they 
are concerned with transition between phases, initiali- 
zation, flow, and cleanup. 

4. Subroutines - These are service routines, 
reached by a calling sequence, and in general used at 
any time by the executive and control routines. 

Tables, Bits. Buffers: 
Tables 

Table of Contents (TOFC) - A table of three-word 
entries, one entry for each statement in the library. 
One word at the top of the table, TCTLD, contains 
the number of entries, the starting address of the 
table, and its own address for indexing the table. 
The name of the entry is left adjusted with trailing 
blanks in IQS in the first word. The record number 
field (bits through 17 of word 2) contains the number 
to be used for ZTAKE by the librarian or the compiler. 
The record number may reflect the old or new posi- 
tions at various times during update. The sort field, 
bits 28 through 45, contains the binary number 
assigned by the SMUPDATE command. The control 
bit field, bit 46 through 63, contains bits used by the 
librarian and the compiler to identify the type of 
entry and current status during update. (See Bits.) 
The memory address field is used only during com- 
pilation by the FORTRAN compiler. The size field 
is created by the librarian for use by the FORTRAN 
compiler. The third table entry illustrates the for- 
mat for a synonym, where NAME3 is a synonym for 
NAMEX. See Figure 127. 

Bits 
There are two classes of bits used by the librarian: 
the PG bits and the control bits in each table of con- 
tents entry. PG bits are within the librarian code, 
and initialized each cycle through the librarian. Con- 
trol bits are used for update and the FORTRAN com- 
piler. 

PG Bits - PG is a word reserved in memory for 
use as switches, indicators, etc. by the librarian. 
Bit meanings are: 

PG 1 - There has been a SMADDMAC or 
SMREPLAC command accepted. Do not allow a 
SMARANGE command. Set by RETURN, tested by 
ARNG and ARANG. 

PG 5 - A SMARANGE command has been 
accepted. Set by ARANG, tested by TAPMRG. 
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PG 7 - Print "added" heading. Additions have 
been made to the file. Set by ADDA, tested by EXIT. 

PG 8 - Additions have been made to generator 
file. Set by PUTT, tested by TAPMRG. 

PG 9 - Deletion of a generator has taken place 



and re-numbering of the generator file is necessary. 
Set by DELETE and REPLC, tested in TAPMRG. 

PG 10 - A rename has taken place. Set by 
RENAME, tested by EXIT. 

PG 11 - A replace has taken place. Set by 
REPLC, tested by EXIT. 

PG 12 - Set by REPLC to cause return from 



JLOAD. 
ADDA. 



Set and turned off by REPLC, tested by 



PG 13 - A synonym has been added. Set by 



SYNM, tested by EXIT. 

PG 14 - Print "deleted" heading. Set by 
DELETE, tested by ALPH. 

PG 15 - A synonym has been deleted. Set by 
DELETE, tested by EXIT. 

PG 20 - This is a new library. No old library 
file exists. Delete and replace operations are illegal. 
Final merge is skipped. Set in STARTA, tested in 
TAPMRG and ARANG. 

PG bits are initialized to zero in STARTA by a Z, PG 
instruction. 

Control Bits - Bits 1.47 through 1.55 in each 
table of contents entry are used to maintain informa- 
tion relating to a particular generator for use by the 
librarian and the compiler. Control bits are stored 
temporarily or permanently as specified: 

1.47 - Delete this entry. Set by DELETE, 
tested in ALPH. (temporary) 

1.48 - This generator has been added. The 
record number in bits 1.0 through 1.17 is the number 
on the NEW file. Set by ADDA, tested by EXIT and 



TAPMRG (temporary). 

1.49 - This generator has been replaced. 
Record number refers to new file. Set by REPLC, 
tested by EXIT and TAPMRG (temporary). 

1. 50 - This synonym has been added. Set by 
SYNM, tested by EXIT, (temporary) 

1. 51 - This entry has been renamed. Set by 
RENAME, tested by EXIT. The new name is in the 
third word (temporary) . 

1.52 - This entry has synonyms. 



Set by 



SYNM, tested by DELETE, RENAME and the 
FORTRAN compiler (permanent). 

1. 53 - This entry is a synonym of the parent 
name in word three. Set by SYNM, tested by 
UPDATE, REVUE, REPLC, ALPH, ARNG, and the 
FORTRAN compiler (permanent). 

1.54 - Used by ARNG to indicate a generator 
has been arranged. 

1.55 -Used by TAPMRG to indicate a generator 
has been merged. 

Buffers 

ABUF - A three-word buffer in which entries to 
the table of contents are built up for subsequent entry 
by ADNTY. Used by ADDA, SYNM, REPLC, and 
RENAME. 

SYNM5 - A one-word buffer in which the scan 
routines, ONFDR and NNFDR, build up a name to be 
examined by FDTNM. 

lOWRD - A 3001-word buffer used for inter- 
mediate storage of a generator before or after 
blocking or unblocking. The first word contains the 
length of the record, exclusive of the first word. 

AXX - The buffer into which command cards are 
converted and packed by WHAT. Used by RETURN 
and the scan routines. 

RBUFER - An eight-word buffer used to build a 
print image. 
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Executive Routines: 

1. Add (ADDA) - Figure 129 - Adds a generator to 
the library, checkii^ for duplication and illegal for- 
mat. Controls sequence through subroutines NNFDR, 
FDTNM, JLOAD, ADNTY and PUTT. ADDA turns on 
PG bit 7 and table of contents bit 1.48, tests and turns 
off PG bit 12, and exits to RETURN. 

2. Replace (REPLC) - Figure 129 - Replaces a 
generator already in a library, checking for validity 
and logic. Controls sequencing through subroutines 
NNFDR, FDTNM, JLOAD, PUTT. It turns on PG 
bits 9, 11 and 12 and table of contents bit 1.49, tests 
table of contents bits 1.48, 1.49, and 1.50, and exits 
to RETURN. 

3. Delete (DELETE) - Figure 129 - Deletes a 
generator and any synonyms from a library. Deletion 
is immediate, and the name may be used later in the 
change deck. Cheeks for validity and Ic^ic. Controls 
sequence through NNFDR, FDTNM. Turns on PG 
bits 9, 14 and 15 (if necessary); table of contents bit 
1.47, tests table of content bits 1.48, 1.49, 1.50, 

1.52, 1.53, and exits to RETURN. 

4. Update (UP DAT) - Figure 129 - Enters an 
arbitrary numeric sort field into the table of contents . 
Cheeks for validity and range of number. Controls 
sequence through ONFDR, FDTNM, tests PG bit 

1.53, and exits to RETURN. 

5. Arrange (ARANG) - Figure 129 - Sets bit for 
eventual arrangement of records by sort field. 
Checks for illegal combination, such as SMARANGE 
used with SMADDMAC or SMREPLAC. Sets PG bit 
5, tests PG bits 1 and 20, and exits to RETURN. 

6. Synonym (SYNM) - Figure 130 - Enters a macro 
into the table of contents, making it a "synonym" of 
another macro. The "parent" macro may not be 
another synonym. It checks for duplication and logic, 
and controls sequence through ONFDR, FDTNM, 
NNFDR, FDTNM, ADNTY. Turns on PG bit 13, 
table of contents bits 1. 50 and 1. 53 in new entry, 
1.52 in parent, and exits to RETURN. 

7. Rename (RENAME) - Figure 130 - Changes the 
name of a generator or synonym. Changes sjmonyms 
of the generator to synonyms of the new name. 
Checks for validity, duplication, and logic. Controls 
sequence through ONFDR, FDTNM, NNFDR, FDTNM, 
ADNTY. Turns on PG bits 10 and 15, table of con- 
tents bits 1.47 and 1.51 in the old entry, tests table 
of contents bits 1.48, 1.49, 1.50, 1.51 in old entry, 
and exits to RETURN. 

Control Routines: 



1. Return (RETURN) - Reads and converts a card 
from the change deck to IQS code. By a series of 
COMPARE instructions, it determines the operation 
to be performed, and branches to the apprqiriate 
executive routine. Uses subroutine WHAT, and turns 



on PG bit 1. Exits to EXIT when file is exhausted or 
to ERROR 1 if command is not recognized. 

2. Exit (EXIT) - Figure 131 - Start of the final 
phases of the library update. It produces a print-out 
of the changes that have taken place, using the PG 
bits, the table of contents, and GRAPHO. Uses ALPH 
to clear the deleted entries (after print-out) and 
alphabetize the new table of contents. Turns off table 
of contents bits 1. 51, 1. 50. Exits to TAPMRG. 

3. Alphabetize (ALPH) - Prints deleted entries 
using GRAPHO (in conjunction with EXIT) and clears 
the entry from the table of contents. Subtracts one 
from the count of entries for each deletion. The 
second part, UPD17, tests for a empty table of con- 
tents condition, and alphabetizes the table. Tests PG 
bits 10, 14 and 15, turns off table of contents bits 

1.52, and exits to ALPHX, within the EXIT routine. 

4. Tape Merge (TAPMRG) - Figure 132 - Performs 
the merge of old and new library files. If there have 
been no deletions from the old file, the old file is 
moved to the new file following any additions. Record 
numbers of old records are increased by the number 
of additions. If records have been deleted (or 
replaced) , the table of contents is searched for each 
record number to determine its validity, and then the 
record number is added to the new file. Uses ZTAKE 
and PUTT. Tests PG bits 20, 9, 8, tests and turns 
off bit PG 6. Tests and turns off table of contents 
bits 1.48, 1.49, 1.55, tests table of contents bit 

1.53, and exits to RAPUP. 

5. Arrange (ARNG) - Figure 131 - Sequences 
generators on the new file by ascending sort fields. 
Generators with the same value are arranged alpha- 
betically. Records starting with value zero are 
fetched from the old file sequentially and written on 
the new. Tests PG bit 1, tests and sets table of 
contents bits 1.53, 1.54, and exits to RAPUP. 

6. Start (STARTA) - The point to which control is 
relinquished from the main section of master update. 
Initializes symbol file tables, clears all PG bits, 
fetches table of contents , and checks validity of 
library being updated. Initializes TCTLD, clears 
PUTER, changes DSK exit to PETXIT, and generates 
change dictionary entries. 

7. Wrap Up (RAPUP) - Final phase of librarian 
update. Forces the write-out of any partial buffers 
of blocked generators, establishes ARCLOC, and 
changes DSK exit to DSKEX. Writes the table of con- 
tents on the disk, types the final message, and 
returns to HEDCTL. 

Subroutines: 



1 . New Name Finder (NNFDR) - The new name 
finder subroutine scans AXX for a single name, or 
the second of two names. It checks for a blank field 
or for parameters greater than 8 characters. It also 
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builds the name left justified in SYNM5 and assumes 
$2 points to the first character of the parameter, and 
that blank is the terminating character. 
Entry sequence: LVI,$1,$+1. 
B, NNFDR 

B, Error return 
Normal return 

2. Old Name Finder (ONFDR) - This subroutine 
scans AXX for the first of two parameters and checks 
for a null field and parameter larger than 8 char- 
acters. A comma is the terminating character. It 
builds parameter left justified in SYNM5. If an error 
is detected, it exits to WRONG. 

Entry sequence: LVI,$1, $+1.0 
B, ONFDR 
Return 

3. Add Entry (ADNTY) - Adds an entry to the table 
of contents. Entry is assumed to be 3 words starting 
at location ABUF. It turns on PG bit 6 to indicate 
additions to the table and increases the count of 
entries in the table of contents (TCTLD+. 28) . In 
addition, it checks the total number of entries for 
overflow, (Maximum is 200 (lo))' '^^'^^ ^xit to OVRFLO 
if an overflow condition exists. 

Entry sequence: SIC, ADNTYX 
B, ADNTY 
Return 

4. Find Table Name (FDTNM) - Performs a linear 
search of the table of contents for the name in SYNM5. 
It checks for zero entries and deleted names. XR3 
points to the entry if found. 

Entry sequence: LVI, $1, $+1.0 
B, FDTNM 

B, Not found return 
Found return 

5. What (WHAT) - Converts Hollerith card code to 
IQS format, packing 72 columns left justified in AXX. 
Using READl to read, it checks HEDBT for an end of 
file, exiting to EXIT if HEDBT is on. The converted 
Hollerith characters are moved to AXX from CARD. 
The first eight characters after the last non-blank are 
made zero. 

Entry sequence: LVI, $1 , $+1 . 
B, WHAT 
Return 

6. Graph O (GRAPHO) - Converts a given number 
of IQS words to A8 format and prints a $SPR line. 
Checks COMBT for $COMM option. 

Entry sequence: CNOP 

SIC, $15 
B, GRAPHO 
XW, 1st character, 
# of words, 
carriage control 
Return 



7. PUTT - Blocks one record, starting at lOWRD, 
on the new library file. Turns on PG bit 8, and keeps 
a running account of the number of records in the new 
file (PUTER). This number is stored in the record 
number field of the table of contents entry. Uses 
ZPUT. XR2 is assumed to point to the entry. 

Entry sequence: SIC, PUTX 
B, PUTT 
Return 

8. Generator Loader (JLOAD) - In addition to nor- 
mal loading, it checks for origin, which must start 
at 1000 no), with subsequent cards not exceeding 
2045(10), and the absence of P, T, or super T cards. 
There are 9 error exits for illegal binary decks , 
JERl through JER9. It uses READl to read cards 
and exits to DABLE in ADDA routine. 

9 . Wrong (WRONG) - Common error print-out 
routine. Prints the entire command and the param- 
eter error or logical error message on both $COMM 
and $SPR (using GRAPHO). Exit is to FINI. 
(WRONG has 3 synonyms: ERROR, GOOF, and 
ERRl) . 

10. Final Error (FINI) - Final error message 
print-out for all error messages. Prints on $COMM 
and $SPR, and exits to $EOJ. 

11. Blocking Routines - The blocking routines, 
ZPUT, ZTAKE, and ZENDFILE are the I-O routines 
that fetch the old library file through $FETCH, and 
write the new library file on the disk using DSK lOD. 
They maintain information about the two files in 
tables called DFILE and FILEl. 

ZPUT - Moves a logical record from lOWRD to 
a buffer (BUFF). When records fill a buffer, 2045 
words , the routine writes the block on disk, updates 
ARCLOC and the count of words within the file. 
(1.28($5)) 

Entry sequence: LVI, $14, $+1.0 
B, ZPUT 
Tl, 0, DFILEl, lOWRD 

Return 

ZTAKE - Transmits a requested record from 
BUFF to lOWRD. Uses $FETCH to read a block at a 
time from PROSA. When the record number requested 
is not in the block currently in memory, it fetches 
another block until the record is found or the END 
return is taken from $FETCH. Should the END condi- 
tion occur, it returns to the librarian at the address 
found in NEXT+2. 

Entry sequence: LVI, $14, $+1. 
B, ZTAKE 
SWAP, $XR, DFILE, lOWRD 

Normal return 

ZENDFILE - Forces the write- out of a block even 
though it is partially empty. Writes an end of file after 
the block. 



236 



Entry sequence: LVI, $14, $+1. 
B, ZENDFILE 
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Return 



PERIPHERAL INPUT-OUTPUT 



Peripheral input-output programs consist of four IBM 
1401 programs: 

1. Tape Labeling 

2. System Peripheral Input I 

3. System Peripheral Input II 

4. System Peripheral Output 

These programs prepare tape labels and input tapes to 
be used by MCP. In addition, the System Peripheral 
Output program prints or punches data from MCP- 
generated output tapes. 

Tape Labeling (1401) 

The IBM 1401 Tape Labeling program labels tapes 
used by the MCP. Input for the label files is supplied 
by a card reader. A label file consists of 11 six-bit 
characters written in high-density, BCD code, using 
the even parity mode. Label cards follow the labeling 
program and specify the labels to be written. There 
is one label card for each tape. 

The format for a label card is as follows: 



Column 1 

Columns 2 through 9 
Columns 10 through 14 
Column 15 



Column 16 



Columns 17 through 24 
Columns 25 through 80 



L punch (all non- L cards 

are ignored). 

Blank. 

Label (5 BCD characters) . 

Density (H=high, L=low). 

If column 15 is blank, an 

H for high density is 

inserted by the program. 

Mode (O=odd, E=even, 

C=odd with ECC). If 

column 16 is blank, odd 

parity is assumed and an 

O is inserted. 

Blank. 

Information contained in 

these columns is printed 

but not recorded on tape. 



Operator Instructions 

1. Ready the card reader, printer, and console; 
place Sense Switch A in the on (up) position and I-O 
Check Stop switch in off (down) position. (Sense 
Switch A must be on because it is used as the last 
card indicator. ) 

2. Ready the first tape to be labeled and all suc- 
ceeding tapes in turn, on unit 1 in high density. 



3. Place the labeling program deck and label cards 
in the card reader hopper, then push Load key. 
NOTE: IBM 1401 binary tapes are always written in 
the odd parity mode, therefore, if the tape is 
to be used by the 1401 System Input Program 
I, column 15 must contain an H for high density 
and column 16 must contain an O for odd parity 
mode. 

Stop Conditions 

Non-Error Stops: Two non-error stops are possible: 

1. STOP 1 - After a label is written on tape and 
concluded with an end of file, the tape is rewound and 
unloaded. The information on the label card associated 
with the tape is printed by the 1403 printer, in addition 
to operator instructions as follows: 

a. Write the above information onto outer label 
of tape on unit 1. 

b. Ready new tape on unit 1 - High Density. 

c. Push Start to continue. 

2. STOP 2 - A message is printed to end the opera- 
tion. 

Error Stop: Only one error stop may be encountered. 

1. ESTOP - A card reader error has occurred. 
The last card in the N/R stacker should be checked, 
repunched if necessary, and reloaded into the hopper. 
When an error card is reloaded, make certain proper 
card sequence is maintained. 

Program Flow, 

Label cards are read, partially checked (columns 15 
and 16), and the information in columns 10 through 20 
printed by the printer. See Figure 133. Columns 10 
through 20 are recorded on tape with an end of file 
mark and the tape is unloaded. Operator procedures 
are printed and a temporary stop condition occurs. 

System Peripheral Input I 

System Peripheral Input I is a 1401 program used to 
create a system input tape for MCP. The tape is 
blocked into 17 card records. Jobs are separated by 
file marks, with a limit of N jobs per tape, where the 
nominal value of N is ten. (See the MCP System Input 
Program. ) 

The first card of each job must be a B card (a B 
punched in column 1), with either JOB or COMD 
starting in column 10. This type of card separates jobs 
and causes end of file marks to be written on the input 
tape. When the last card of the last job has been 
written on tape, two end of file marks are written on 
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the input tape. If the I-O check switch (on the console) 
is in the off (down) position, tape and reader errors 
are handled internally by the program. The only input 
source for the program is the card reader. 

Input Deck 

The input deck to be written must consist of a sequence 
of jobs, each job starting with a job card. COMD 
cards may occur only between jobs (ahead of a job 
card) . 

Operator Instructions 

1. Ready scratch tape (with a label) on tape unit 2 
in high density. This will now become the input tape. 

2. Ready the printer, reader and console. Place 
I-O check switch off, and Sense Switch A in the on 
position. NOTE: Sense Switch A, the last card 
indicator, must always be in the on (up) position. 

3. Load the reader hopper with the system input 
program, followed by the jobs. 

4. Push the reader Load key. 



rection is made, the remainder of the job must be 
removed and the program restarted with the next job. 

ESTOP 4 - A card reader error has occurred during 
the reading of any card after the first. The error 
card falls into the normal read stacker, and a mes- 
sage is printed by the printer. To continue, the card 
reader must be cleared, and the error card plus all 
succeeding cards placed in the hopper with the error 
card first. Proper card sequence must be maintained. 
The printed message is as follows: CARD READER 
ERROR RESTART WITH CD IN NORM STACKR. 

ESTOP 5 - During the writing of tape, if it becomes 
necessary to erase tape more than three consecutive 
times to rewrite the same record, ESTOP 5 occurs. 
This stop condition may be construed as an equipment 
malfunction. The following message is printed: 
TAPE TROUBLES, RELOAD - RESTART ON NEW 
TAPE DRIVE. 

ESTOP 6 - When an end of reel condition occurs, 
a printed message shows which job must be rewritten 
on a new loaded tape. The message is as follows: 
END OF REEL, LOAD NEW LABELED TAPE ON 
UNIT 2. RELOAD PROGRAM AND JOBS STARTING 
WITH JOB 



Programmed Halts 



Program Flow 



STOP 1 - The last card of the last job has been read, 
end of file marks are written on the input tape and the 
tape is unloaded. 

ESTOP 1 - A card reader error occurred during the 
loading of the object deck. For this condition, there 
is no program recovery. To restart, the card reader 
must be cleared, and the system input program rein- 
serted in the card hopper and the Load key pressed. 
Proper card sequence must be maintained. If the 
error condition is repeated, the programmer should 
reload the program with the I-O Check Switch in the 
on (up) position to ascertain which card is incorrect. 

ESTOP 2 - A card reader error has occurred 
during the reading of the first card. The error card 
falls into the normal read stacker, and a message is 
printed by the printer. To continue, the card reader 
must be cleared, and the error card plus all succeeding 
cards placed in the hopper with the error card first. 
Proper card sequence must be maintained. The 
printed message is: CARD READER ERROR RESTART 
WITH CD IN NORM STACKR. 

ESTOP 3 - The first card read was not a B-JOB or 
B-COMD card. An error message is printed and the 
operation stops. The message is as follows: THE 
FIRST CARD IS NOT A B-COMD OR B-JOB CARD, 
REJECT THIS JOB AND RESTART WITH THE NEXT 
JOB. This error condition may be corrected by 
having the operator punch a B-JOB or B-COMD card 
and reinsert the job in the reader hopper. If no cor- 



When the system input program has read the first 
card, the buffers are reset and the tape label passed. 
See Figure 134. 

If the first card containing a B in column 1 is a job 
or command card, and is error free, a branch to R3 
occurs. The branch to R3 sets CI into the instruc- 
tion and the first card is moved into the buffer. If the 
card read is not the 17th card of the record, CI is 
stepped one count and the program is looped back to 
Rl. 

If a card has a B punch, a branch to WRT is again 
performed to determine if the card is a new job or 
command card. If the card is neither a job card nor 
a command card and re-entry is made at R3, the card 
is entered into the buffer and CI is sequenced. When 
17 cards have been read, a tape writing procedure is 
set up, the contents of the buffer are written on tape, 
the error counter is reset to zero, and re-entry made 
atSTl. 

When a new job or command card is encountered, a 
check is made to determine if any data remains in the 
buffer from the previous job. If so, the remaining 
data is written on tape, the error counter is reset 
and a tape mark (end of fUe) is recorded on the tape. 
When the last card from the hopper is detected, the 
program branches to QUIT, and a group and word 
mark are set into the buffer. The contents of the 
buffer are written on tape followed by two tape file 
marks, and the program halts. 
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A message is printed if an error, such as a multi- 
punch, is detected during a card reading procedure. 
If an error exists, the operator must clear the reader 
and return the cards to the hopper, making certain 
proper sequence is maintained, and initiate start. 
The program causes a branch to Rl and the read and 
error check is again performed. 

System Peripheral Input IT 

System Peripheral Input II is a 1401 program used to 
generate a system input tape for MCP. System Periph- 
eral Input II differs from Input I as follows: 

1 . Input II can furnish its own tape label file or 
have no label file. 

2 . Data for Input 11 can be supplied by either a 
master tape or a card reader. 

The program writes the input tape in the same format 
as System Peripheral Input I. 

Card Format 

Control cards follow the object deck and select the 
input media (card reader or tape) for the input tape. 
The control cards are distinguished by an 11-6-8 
punch in column 1, which corresponds to a 1401 semi- 
colon. When read by the card reader, the informa- 
tion contained on the control card is printed by the 
printer. Three types of control cards (BCD punched) 
are used to control the operation of the input tape 
program: 

1. Label card 

2. Master tape 

3. Card reader 

The formats for the individual cards are: 

Label Card: The label card must follow the object 
deck. The label control card contains the information 
necessary to write the label on the input tape. Columns 
10 through 20 (as defined below) may be written as 
the first file on the input tape. 

Column 2 L - defines a label card. 

Columns 10 through 14 A five character label. 

If the label NOLAB is 
used, columns 10 through 
20 wUl not be written on 
the input tape. 
Column 15 Program assumes H for 

high density. 
Column 16 Program assumes O for 

odd parity. 
Columns 17 through 20 Additional BCD informa- 
tion to go on the input 
tape label file. 



Master Tape Select Card: The file or files specified 
by the control card wUl be read from the master tape 
and written in 17 card records on the input tape. The 
output from the master will be buffered until a record 
(17 cards) is accumulated. Two consecutive End of 
File marks will identify the end of master tape. 
Column 2 T - denotes input from 

the master tape. 
Columns 10 and 11 Denote the first file to 

be read from the master 
tape. 
Columns 14 and 15 Denote the last file to be 

read from the master 
tape. If columns 14 and 
15 are blank, only one 
file from the master 
tape will be written on 
the input tape. If 
columns 14 and 15 con- 
tain a fUe number, the 
file specified in columns 
10 and 11 through the 
file specified in columns 
14 and 15 wUl be written 
as one file on the input 
tape. 
Columns 20 through 80 Any additional descriptive 

information will be con- 
tained in these columns. 
The information will be 
printed, but not recorded 
on tape. 

Card Reader Select Card: The card deck to be read 
onto the input tape must immediately follow the card 
reader select control card. The deck will be read 
and blocked into 17 card records, and these records 
written on the input tape. When a new control card is 
read, an end of file will be written on the input tape. 
Column 2 R - denotes input will be 

from the card reader. 
Columns 20 through 80 Any additional descriptive 

information will be con- 
tained in these columns. 
The information will be 
printed, but not recorded 
on tape. 

Input Deck 

The first cards of the input deck are arranged as 
follows: 

Label card 

T or R control card 

(Job deck if R control card) 
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These cards may be followed by control cards or job 
decks as previously explained to make up the complete 
input deck, COMD cards may precede job cards in a 
job deck. 

Operator Instructions 

1. Ready the master tape on tape unit 2 in the 
density specified by the outer tape label. The input 
tape should be readied on tape unit 3 in high density. 

2. Ready the printer, reader and console. Set 
sense switch A and the I-O check switch off. 

3. Load the object deck and input deck in the 
reader. 

4. Press the reader Load key. 

Programmed Halts 

STOP 1 - When the last card is read, the system 
peripheral input is completed. A second end of file 
is written on the input tape, the tape is rewound and 
unloaded. This completes the system input program; 
there is no recovery other than reloading. 

ESTOP 1 - The first control card of a system input 
must be a label card. If the first card is not a label 
card, NO LABEL CARD is printed and the program 
halts. A label card must be made, the cards reloaded 
with the label card first, and the Start Key depressed 
to start the operation again. 

ESTOP 2 - If a control card contains an error, or 
is not in correct sequence, an error message is 
printed and the operation halts. The error message 
is: CNTRL CD ERR - CORRECT AND RESTART. 
Because all control cards are printed, the last card 
printed is the incorrect card and will be stacked in 
the NR stacker. The operator may correct the con- 
trol card in error and press the start key. If the 
control card cannot be corrected, the program must 
be removed. 

ESTOP 3 - If five consecutive tape errors occur 
during the reading of the master tape, the program 
prints the following message and the operation stops: 
STOP - BAD MASTER TAPE - STOP. There is no 
recovery via the program. 

ESTOP 4 or ESTOP 5 - If a reader check error 
occurs during the reading of card files, the message 
READER ERR - START WITH CD IN NR is printed 
and the program stops. To recover from the stop 
condition, the first card in the NR stacker and all 
succeeding cards must be reloaded in the reader 
hopper, and the Start key pressed. 

ESTOP 6 - If an end of reel condition occurs on the 
input tape, the message END OF REEL is printed and 
the program stops. The entire tape must be rewritten, 
removing the last job processed. The last control 
card printed will identify the last job processed. 



NOTE: It is possible for a non-prc^rammed halt to 
occur during a program run. The input pro- 
gram assumes that the input tape files are in 
an ascending order, so that the master tape 
will only go in the forward direction during 
normal operation. When two end of file marks 
are read from the master tape, the master 
tape will be rewound and unloaded. Any 
future reference to the master tape will cause 
machine hangup, because the tape unit is in 
the not-ready condition. 

Program Flow 

When the System Peripheral Input n program has 
been loaded, the input program then checks the first 
card to determine if it is a label card. See Figure 
135. If the first card is not a label card, an error 
message is printed and the program stops (ESTOP 1). 
The operator receives printed instructions and can 
prepare the required label card. The next control 
card indicates the input medium for the input data. 
If the card reader is the input selected, the succeeding 
data cards are sequentially stored in the tape buffer 
until a 17 card record has been accumulated. The 
contents of the tape buffer are then written on the 
input tape, and another record accumulated. If a 
new control card is read, the input program writes 
the data accumulated in the buffer followed by an 
EOF on the input tape and loops to CNTL to decode 
the control card. 

If a master tape is the input selected, the tape is 
read and passed until it is positioned at the desired 
fUe. The files indicated on the control card are read 
one record at a time up to a maximum of 17 records, 
and stored in the input tape buffer. When the seven- 
teenth tape record is read, the contents of the input 
buffer are written on the input tape, and another 17 
records are read and written, continuing until the 
input specification is satisfied. If the end of the 
master tape has been reached, as indicated by two 
end of file marks, it is rewound and unloaded. Any 
further reference to the master tape causes a machine 
hangup. 

If the input tape reaches its physical end during the 
writing of a file, the entire tape must be done over, 
removing the last job processed. An ESTOP 6 error 
message is indicative of this condition. When the 
last card is read, the input program ends the input 
tape by placing a second end of file mark on the tape 
and then unloads the tape (STOP 1). 

System Peripheral Output 

The System Peripheral Output program is a 1401 pro- 
gram used to print and punch (unblock) the records 
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from the MCP-generated output tape. The output tape 
will be read and each record will be printed or 
punched. When a punched file is completed, a blank 
card is read from the card read hopper to be used as 
a file separator. When a file is printed, the printer 
carriage is restored. Errors are handled internally 
by the program if the I-O check switch on the console 
is off. 

The punched card output is stacked in stacker 8/2 
(middle stacker) . To allow the last card of a file to 
be stacked in stacker 8/2, an extra card is punched. 
This extra card is stacked in the normal punch (NP) 
stacker. Any mispunched cards are also stacked in 
the NP stacker; therefore, all cards in the NP stacker 
should be ignored and discarded. 

Operator Instructions 

1. Ready output tape on tape unit 2 in high density. 

2. Ready the punch, reader and console (RUN mode); 
set sense switch A on, I-O check switch off. 

3. Load object deck and separator cards in reader 
hopper. 

4. Load blank cards in punch hopper. (Separator 
cards should be a different color and different corner 
cut than cards to be punched.) 

5. Press Load key on console. 

Programmed Halts 

For all programmed halts, a message is printed 
giving procedures for the operator to follow in order 
to correct errors and resume operation. 

STOP 1 - When the output tape reaches its physical 
end, a trailer record is read which tells whether or 
not the job is continued on another tape. The mes- 
sages are: TAPE END - JOB CONT ON NEXT PAGE, 
or TAPE END. 

STOP 2 - If a tape error is detected, the tape is 
backspaced and the tape record is read again. If the 
error occurs five successive times, the operation 
stops and the following error message is printed; 
BAD TAPE RECORD, IF START IS PUSHED, NEXT 
TAPE RECORD WILL BE READ. The operator may 
either continue the operation by depressing the Start 
key or stop the operation. However, if the Start key 
is depressed, the error tape record will be ignored. 

STOP 3 - If a print error is detected, an error 
message is printed, the printer carriage is restored 
and the operation stops. The error message is: 
PREVIOUS LINE HAD A PRINT CHECK - PUSH 
START TO PROCESS NEXT LINE. 

STOP 4 - If a punch error is detected, a new card 
is punched. The card containing the error is stacked 



in the NP stacker. If five successive attempts to 
punch card correctly have failed, the operation stops 
and the following error message is printed: PUNCH 
GOOFED 5 TIMES ON THE SAME CARD - IF START 
IS PUSHED, NEXT CARD WILL BE PUNCHED. The 
operator may either continue the operation by pressing 
the Start key and omitting the error card, or halt the 
operation to determine the area of malfunction and 
correct the malfunction. 

Program Flow 

As the output tape records are read, a tape read error 
check is performed. See Figure 136. If a tape read 
error is detected, the tape record is backspaced, the 
error counter is incremented by one, and the record 
is read again. If, after four successive attempts at 
rereading the tape record, the error still exists, an 
error message is printed and the operation stops 
(STOP 1). With no tape read error detected, the first 
character of each record is checked to select the 
output media, either printer or card punch. If C is 
the first character, the record (ten cards) will be 
punched. The absence of a C indicates the record 
(12 lines) will be printed. 

With the card punch selected as the output media, 
the data is punched, error checked, and, if error 
free, stacked in stacker 8/2. If a punch error is 
detected, the error card is dropped in stacker NP, 
the error counter is incremented by one, and the 
same card is re-punched. Five attempts are made 
to punch the card correctly. If all five attempts fail, 
an error message is printed and the operation stops 
(STOP 4). With the card punch operation error-free, 
the punch address is incremented by 160 and the next 
card is punched. This operation continues until the 
last (tenth) card is punched. After the tenth card is 
punched, checked, and stacked, the program branches 
to NEXT and reads the next record. 

If the first character of the record is not a C, the 
printer is readied, a line is printed and then error 
checked. If an error is detected, an error message 
is printed and the operation stops (STOP 3). As each 
line is printed, a line count is maintained. When the 
twelfth line is printed the routine loops and the next 
record is read. 

When a tape mark is read, a separator card is 
passed to stacker 8/2 from the read hopper. The 
punch operation is delayed until the separator card 
is passed. A second tape mark immediately following 
indicates the physical end of data, and the trailer 
record is read to determine if EOJ coincides with the 
end of tape. A non-zero trailer record specifies EOJ. 
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APPENDIX A - SYMBOLIC I-O CONTROL TABLES 



CHANNEL AND UNIT STATUS TABLES 

The channel and unit status tables reflect the opera- 
tional status of all 1-0 channels and units logically 
attached to the system. The tables are constructed 
by the Initializer program at IPL time from lOCD 
cards defining the 1-0 configuration. Because MCP 
initiates all I-O and accepts all I-O interrupts for 
both MCP and the problem program, it is necessary 
for MCP to have complete information on the status 
of all channels and units . The channel and unit status 
tables provide this information in the form of specific 
indicators contained in the tables . 

The channel and unit status tables will exist in two 



distinct forms , depending upon whether a channel has 
a single logical or physical unit (Figure 137), or 
multi-units (Figure 138). The form for any particu- 
lar channel is determined by an indicator which is in a 
constant position for both types of tables. If the 
channel is a single-unit entity, the channel and unit 
status indicators are described in a single entry in 
the channel status tables. If a channel is a multi- 
unit entry, the channel status table entry will contain 
information pertaining to the channel, while a sepa- 
rate table, referred to by the channel status table, 
will contain information about each of the units in 
distinct entries in the table. An entry in these tables 
consists of one word. 
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Channel Status Table Entry - Single Unit Channel 

Symbol 



Bits 



.00 - .17 



SUNAA 



.25 



SCHAVL 



Content 

This field contains the address of the unit area table 
(UAT) attached to the channel. If the unit has never 
been assigned, the entry will be zero. This field is 
set at IPL, and by I-O assignment, the I-O change 
command, and the special assignment package. The 
field is referred to by the identifier, the receptor, 
the I-O change command, the special assignment 
package, and I-O assignment. 

- Channel is available 

1 - Channel is not available 



,26 



SCHOP 



A channel is available when it is physically attached to 
the exchange and is capable of being actuated by MCP. 
This indicator exists in the channel status table of either 
a single or multi-unit channel. It is set at IPL, and 
sometimes by the I-O change command. It is tested by 
the identifier (as an internal MCP check upon actuation) , 
by special assignment, I-O assignment and I-O change. 

- Channel not operating 

1 - Channel operating 

This indicator exists in the channel status table of either 
a single or multi-unit channel. It is set by the actuator 
routines and reset by the receptor. It is tested by the 
identifier, I-O change command and special assignment. 
Job Control 4 and UNASSIGN and the $FREE routine. 



,27 



SMULTI 



- Single-unit channel 

1 - Multi-unit channel 



,28 



SUNAVL 



This indicator exists in the channel status table of 
either a single or multi-unit channel. It is set at IPL. 
It is tested by most actuator routines, I-O change 
command, special assignment, UNASSIGN, I-O assign- 
ment and receptor. 

- Unit is available 

1 - Unit is not available 



A unit is available when it is physically attached to a 
channel and is capable of being actuated by MCP. This 
indicator exists in the channel status table for single 
unit channels and in the unit status table for multi-unit 
channels. It is set at IPL and sometimes by the I-O 
change command. It is tested by the identifier, I-O 
change, special assignment and I-O assignment. 
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Bits 



.29 



Symbol 
SUNASG 



Content 

- Unit is assigned 

1 - Unit is not assigned 

A unit is assigned if it is logically connected at present 
to either MCP or the currently operating problem pro- 
gram. This indicator exists in the channel status table 
of single unit channels , and in the unit status table of 
multi-unit channels. It is set by I-O assignment and 
sometimes by special assignment and the I-O change 
command. It is tested by the identifier, I-O assign- 
ment, I-O change command, special assignment and 
some actuator routines. 



,30 



SUNSUP 



,31 



SSETUP 



,32 



SOWNER 



- Unit is not suppressed 

1 - Unit is suppressed 

This indicator exists in the channel status table of 
single unit channels, and in the unit status tables of 
multi-unit channels. The unit suppressed indicator 
is set to 1 when an I-O interrupt has not been taken 
for a specific unit. It is set by the receptor, and tested 
by the identifier and the I-O change command. 

- Not Setup operation 

1 - Setup operation 

This indicator exists in the channel status tables of 
single unit channels, and in the unit status tables of 
multi-unit channels. The setup indicator is turned on 
by the actuator whenever control is to be returned to 
the actuator for further processing of an I-O request. 
It is set by the actuator, and tested by the receptor 
and I-O change. 

- Problem program 

1 - MCP 



.46 



SSEOP 



This indicator exists in the channel status tables of a 
single unit channel, and in the unit status table of a 
multi-unit channel and shows what level of program is 
the current owner of a particular unit. It is set by I-O 
assignment, I-O change command, and special assign- 
ment, and is tested by the receptor, identifier, I-O 
change command and special assignment. 



Allow EOP 
Suppress EOP 



This indicator exists in the channel status table of a 
single unit channel, and in the unit status table of a 
multi-unit channel and shows that the I-O operation has 
been requested in the SEOP mode. If the operation is 
terminated with an EOP, no indication will be given to 
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Bits 



Symbol 



Content 

the user. It is set by the identifier and tested by the 
receptor. 



.50 - .51 



SCMODE 



00 - Illegal 

01 - ECC, ODD parity 

10 - EVEN parity 

11 - NOECC, ODD parity 

This indicator exists in the channel status table of 
either a single or multi-unit channel. It is set initially 
at IPL to illegal (00) , and subsequently by the actuator. 



.52 - .55 



SEQUIP 



- 


- Illegal 


5 - Printer 


1 - 


- Disk 


6 - None 


2 - 


- Console 


7 - None 


3 - 


- Card Reader 


10 - Tape 


4 - 


- Punch 


11-17 - None 



.57 



SRD 



This field exists in the channel status tables of either 
a single or multi-unit channel. It is set by the initial- 
izing program and it may be changed by the I-O change 
command for single-unit channels. 

- Non-read operation 

1 - Read operation 

This indicator exists in the channel status tables of a 
single unit channel, and the unit status table of a multi- 
unit channel. The indicator is set by the actuator when- 
ever a read operation, which is not a setup operation, 
is in progress. It is reset by the receptor. It may also 
be cleared by the I-O change command. 



.58 



SWR 



,60 



SCTL 



- Non-write operation 

1 - Write operation 

This indicator exists in the channel status table of a 
single unit channel, and the unit status table of a multi- 
unit channel. It is set by the actuator whenever a write 
operation, other than a setup operation, is in progress 
and is reset by the receptor. It may also be cleared by 
the I-O change command. 

- Non- control operation 

1 - Control operation 

This indicator is found in the channel status table of a 
single unit channel or the unit status table of a multi- 
unit channel. It is set by the actuator whenever a con- 
trol operation other than a setup operation is initiated 
and is tested and reset by the receptor. 
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Bits 



,61 



Symbol 
SREL 



62 



SUNRES 



Content 

Non-release operation 
Release operation 



This indicator exists in the channel status table for a 
single unit channel and in the unit status table for a 
multi-unit channel. The release indicator is set by the 
actuator whenever a release pseudo-operation is 
requested. The indicator is tested by the receptor. 

- Not reserved 

1 - Reserved 



,63 



SOVRES 



Channel Status Table Entry - Multi-Unit Channel 
Bits Symbol 

.00 - .27 SUNNA 



This indicator exists in the channel status table of a 
single unit channel and in the unit status table of a 
multi-unit channel. It is a second level indicator for 
special situations in I-O assignment reservation of 
units. It has priority over SOVRES. It is set and 
tested by the I-O assignment program. 

- Not reserved 

1 - Reserved 

This indicator exists in the channel status table of a 
single unit channel and in the unit status table of a 
multi-unit channel. It is used by I-O assignment to 
ascertain those units which have been preassigned in 
the overlapped mode of operatioii and is set and tested 
by I-O assignment. 



Content 



This field contains the address of the first entry in the 
unit status table for the channel. 



,28 - .31 
, 32 - . 49 



,50 - .55 
,56 - .58 



Not Used 



SARCAD 



This field exists only in the channel status table of a 
multi-unit channel. It contains the arc address of the 
last arc to be located on the disk to which the channel 
status table entry refers. It is set by the actuator 
whenever a locate or read or write of the disk is com- 
pleted. 



Same as single unit channel. 



SUNIT 



0-7 indicates which logical or physical unit is presently 
selected for the specific channel to which the channel 
status entry refers. This field exists only in a multi- 
unit channel status table entry. It is set by the actuator 
locate routine. 
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Bits 



. 59 - .62 



.63 



Symbol 
SUNITK 



Not Used 



Content 

- ITg indicates the number of logical or physical unit 
status table entries attached to the channel to which the 
channel status entry refers. This field exists only in 
a multi-unit channel status table entry. It is set by the 
initializing program. 



Unit Status Table Entry - Multi-Unit Channel 
Bits Symbol 

.00 - .17 SUNAA 



Content 

This field contains the address of the unit area table 
(UAT) attached to it. If the unit has never been assigned, 
the entry will be blank. The field is controlled at IPL, 
and by I-O assignment, the I-O change command, and 
the special assignment package. It is referred to by 
the I-O identifier, the receptor, the I-O change com- 
mand, the special assignment package and I-O assign- 
ment. 



.26 



STATI 



.27 



SDISPO 



Scratch tape 
Specific tape 



This indicator is found in the unit status table of a 
multi-unit channel. If a tape channel, this indicator 
shows whether a scratch tape is mounted or a specif- 
ically designated tape is mounted for the given unit. 
This indicator is set and tested by I-O assignment. It 
may be reset by I-O change. 

- Tape mounted 

1 - No tape mounted 

This indicator exists in the unit status table of a multi- 
unit channel. It indicates whether a tape reel is 
mounted on a particular unit, or not mounted. It is set 
and tested by I-O assignment, UNLOAD, FREE, and 
lOCHANGE command. 



.28 - .32 
.33 



Same as in Single Unit Channel Status. 



SSETDN 



,39 



SSEL 



- Density never set 

1 - Density set 

This indicator forces the density of a tape unit to be set 
the first time the unit is referenced after IPL. 

- Selected 

1 - Not selected 



This indicator exists in the unit status table of a multi- 
unit channel. It indicates which unit is presently located 
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Bits 



Symbol 



Content 



or selected to the channel. The select Indicator is set 
originally by the initializing program and later by the 
actuator routines. 



.40 



SVER 



- Verified 

1 - Not verified 



This indicator is found in the unit status table of a multi- 
unit channel. It indicates whether a tape label has been 
verified on a particular unit or not. The verify indicator 
is turned on by I-O assignment and sometimes by the 
I-O change command and special assignment. It is 
tested and turned off by the actuator. 



.46 



SSEOP 



Allow EOP 
Suppress EOP 



.47 



SCNSSG 



This indicator exists in the channel status table of a 
single unit channel, and in the unit status table of a 
multi-unit channel. It shows that the I-O operation has 
been requested in the SEOP mode. If the operation is 
terminated with an EOP, no indication will be given to 
the user. The indicator is set by the identifier and 
tested by the receptor. 

- No console signal 

1 - Console signal 

This indicator exists in the unit status table of a multi- 
unit channel. It is set by the conceptor and is tested by 
the actuator READ routine. 



,49 



SUNDENS 



- High 

1 - Low 



.50 



SELG 



This indicator exists in the unit status table of a multi- 
unit channel. It reflects the current density setting of 
that unit, if applicable. It is set by the initializing pro- 
gram to high density, and altered thereafter by the 
actuator. It is also tested by the actuator. 

- No erase long gap operation 

1 - Erase long gap operation 

This indicator exists in the unit status table of a multi- 
unit channel. It indicates whether or not an erase long 
gap operation, which is not a setup operation, has been 
requested by an $ELG pseudo-op. This indicator is set 
by the actuator, and tested and reset by the actuator 
($Write Routine Only) . 
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Bits 



.51 



Symbol 
SMOUNT 



.52 



SREW 



.53 



SIMNT 



Content 

- Not awaiting tape mounting 

1 - Awaiting tape mounting signal 

This indicator exists in the unit status table of a multi- 
unit channel. It is set by the actuator, I-O assignment, 
I-O change command, and special assignment. It indi- 
cates that a channel signal can be expected from the 
reading of a tape unit after mounting of a reel. The 
indicator is tested and reset by the receptor, I-O change 
command, and the actuator. 

- Not rewind tape operation 

1 - Rewind tape operation 

This indicator exists in the unit status table of a multi- 
unit channel. The indicator is set to 1 by the actuator 
whenever a rewind operation, other than a setup opera- 
tion, is in progress, and is tested and reset by the 
receptor. 

- Not initial mount status 

1 - Initial mount status 



This indicator is found in the unit status tables of a 
multi-unit channel. The indicator shows that the first 
mounting request has been made for program tape I-O 
request, and the channel signal has not been received 
indicating that the tape reel has been mounted. The 
indicator is set by the I-O assignment package, and 
sometimes by the I-O change and special assignment 
programs. The indicator is tested and reset by the 
receptor. 



.57- .58 
.59 



Same as Single Channel Status. 



SSPACE 



- Non-space operation 

1 - Space operation 

This indicator is found in the unit status table of a 
multi-unit channel. It indicates that a spacing opera- 
tion, other than a setup operation, is in progress on a 
tape unit. The indicator is set by the actuator and 
tested and reset by the receptor. 



. 60 - . 63 

THE UNIT AREA TABLE 



Same as Single Channel Status. 



The unit area tables contain information about assigned physical units. I-O assignment builds the 
tables and then the actuator and receptor store in and use significant information from the tables 
during the execution of I-O operations. There is one unit area table for each existir^ unit; its 
address can be obtained from either the I-O location table or the channel or unit status table to 
which it is attached. A unit area table consists of nine words (Figure 139), and its format is as 
follows: 
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Word 1 





SCHANN 
Channel 
number to 
which unit 
area is 
attached 




2 

a 

Unit 
NO. 





12 



18 



47 



49 



63 







SIODK 




SRMTC 






Pi 


2 




Number of lOD re- 
quests or file area 




Time of 
last message 




i 

5 




A 


table on unit specified 









Word 3 



Word 4 



17 



32 



S6 



63 



SEVLTB 




SEVLMK 




Base address of the evaluation 




Address of the evaluation 




table for the pseudo-operation 




mask for pseudo op being 




being processed 




processed 





32 



SO 



63 



SFIAAC 




SCWADR 




>• 






Address of the file area table 




Address of the first con- 






presently attached to the unit 




trol word of a requested 










operation 




tfl 


00 





17 



32 



49 



63 



Word 5 



SIOINS 

The last I-O instruction actuated for the unit 



Word 6 



18 



42 



49 



63 



SRETAD 
Address in actuator where receptor 
returns control if terminated op 
was a setup 




SCTIOP 
Last con- 
trol op 
code given 
to the unit 





63 



Word 7 



SSCRPM 
This field is used by several actuator routines as an intermediate storage media 
assigned to the unit being acted upon 



Words 



16 17 



25 



29 



38 



49 



Word 9 



Figure 139. Unit Area Table 



17 



32 



49 



63 





03 




2 




Q 




SFILEK 
File position of 






3- 




>2 




i 




the tape for the 






1/5 




i/i 




so 




unit 





63 



SFREEL 

Address of first reel entry in 
the reel pool table for a unit 




SCREEL 
Address in the reel pool 
table of the current tape 




SREELK 

Numerical pos- 
ition of current 
tape in reel 
sequence 



57 



63 
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Bits Symbol 

0.12-0.18 SCHANN 



0.47 - 0.49 



1.06- 1.17 



2.00 - 2.18 



2.32 - 2.50 



3.00 - 3.17 



3.32 - 3.49 



SUNITN 



SIODK 



1.32 - 


1.56 


SRMTC 


1.62 
1.63 




SUUNAS 
SRMIND 



SEVLTB 



SEVLMK 



SFIAAC 



SCWADR 



Content 

This field contains the binary number, located at a half 
word address, representing the channel number to which 
the unit area is attached. The field is set by I-O assign- 
ment and sometimes by I-O change and special assign- 
ment. It is used by the actuator, receptor and I-O 
change. 

This field contains the binary number, located at a full 
word address, representing the unit number to which 
this unit area is attached. Setting and testing of this 
field is the same as for SCHANN. 

This field specifies the number of lOD requests or file 
area tables attached to the unit specified, as a binary 
number, located at a full word address. The field is 
set by I-O assignment. 

Time of the last mount message. 

Unas sign indicator 

1 = already unassigned. 

Remind bit: 

- Mount reminder message not sent. 

1 - Mount reminder message sent. 

This field specifies the base address of the evaluation 
table for the pseudo- operation currently being processed 
for the unit. 

This field contains the address of the evaluation mask for 
the pseudo- operation currently being processed for the 
unit. It is set and used by the actuator. 

This field specifies the address of the file area table 
presently attached to the unit. It is set and used by the 
actuator. 

This field contains the address of the first control word 
of a requested operation. It is set by the control word 
checking routine in the actuator, and is used by the 
actuator. 



3.60 
3.61 



SRETRY 
SREMNT 



I-O instruction retry control bit. Ifl, retry. 

This indicator is set by the tape label verification 
routine. It indicates to the verification routine whether 
or not a problem program tape has failed to verify and 
the operator has been informed. 

- New tape not requested 

1 - New tape requested 
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Bits Symbol 

4.00-4.63 SIOINS 



5.00 - 5.18 



5.42 - 5.49 



6.00 - 6.63 



7.16 - 7.17 



SRETAD 



SCTLOP 



SSCRPM 



SLABM 



Content 

This field contains the last I-O instruction actuated for 
the unit. It is set and used by the actuator. 

This field contains the address in the actuator to which 
the receptor will return control if the terminated opera- 
tion was a setup operation. The field is set by the 
actuator and used by the receptor. 

This field contains the control operation code, in binary, 
for the last control operation given to the unit. It is 
set and used by the actuator. 

This field is used by several actuator routines as an 
intermediate storage media assigned expressly to the 
unit being acted upon. 

This field indicates the mode specified in the label of a 
system tape after said tape has been verified. The field 
is set by the verify routine and used by the actuator. 

00 - Illegal 

01 - ECC - ODD 

10 - EVEN 

11 - ODD - NOECC 



7.25 



SSYSTM 



7.29 



SLABD 



This indicator tells whether the tape presently mounted 
on the unit is a labelled tape, or not. It is set by 1-0 
assignment and altered by the receptor when new tapes 
are mounted. It is tested by the receptor and by the 
verify routine. 

- Non-labeled 

1 - Labeled 

This indicator specifies the density found in the label 
after verification. It is set, tested, and used by the 
actuator. 

- High 

1 - Low 



7.38 - 7.49 



SFILEK 



8.00 - 8.17 



SFREEL 



8.32 - 8.49 



SCREEL 



This field specifies the file position of the tape for the 
unit. If the tape is labelled, file zero is the label file. 
The file count will be -0 if before the label record and 
+0 if after the label record but before the label file 
mark. The field is set by I-O assignment and tested 
and altered by the actuator and receptor. 

This field contains the address of the first reel entry 
in the reel pool table for a tape unit. It is set by I-O 
assignment and used and modified by the actuator and 
receptor. 

This field contains the address in the reel pool table of 
the currently mounted tape. It is set by I-O assignment 
and altered by the actuator. 
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Bits Symbol 

8.57 - 8.63 SREELK 



Content 

This field indicates the numerical position of the 
currently mounted tape reel in the sequence of reels 
for the tape unit. It is set by I-O assignment and altered 
by the receptor. 



THE FILE AREA TABLE 

A file area table exists for each lOD card, containing the information from the lOD card, and 
also containing information obtained from an interrupt received for the specific file. The file 
area tables are constructed by the Move routine in 1-0 assignment just before the Go phase of 
a program. File area tables exist for the MCP lOD cards. A file area table consists of seven 
words (Figure 140), and its format is as follows: 



Bits 



Symbol 
0.00-0.17 SIODRN 



0.32 - 0.50 



SACTAD 



1.09 - 1.13 



SIOIND 



Content 

This field contains the lOD reference number, in binary, 
for the file area table. It is set by I-O assignment, and 
used by the receptor. 

This field contains the address of the calling sequence 
which caused the last actuation on this file. The field 
is set by the identifier and transmitted to the table of 
exits when an interrupt is unstacked. 

This field contains the I-O indicators after the receptor 
has processed an interrupt. It is set by the receptor 
and transmitted to the table of exits when an interrupt 
is unstacked. 



1.32 - 1.50 



1.57 



2.00 - 2.17 



2.27 - 2.28 



SINTAD 



SEW AIL 



STOELO 



SFDEN 



This field contains the address in the program at which 
interruption occurred for the I-O interrupt being 
unstacked. It is set by the receptor. 

This indicator enables the $WAIT routine to not wait 
again on a file which has been reactuated in a fixup. It 
is set and tested and reset by the $WAIT routine. 

This field contains the address of the table of exits 
presently attached to this file. It is set by I-O assign- 
ment, but may be altered by the $CHEX routine. 

The file density is that density specified on the lOD card. 
It is set in the file area table by the I-O assignment 
routine and used by the actuator. 

00 - Null 

01 - High 

10 - Illegal 

11 - Low 
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Word 1 



SIODRN 
lOD reference number 
in binary 




SACTAD 
Address of calling sequence 
which actuated file last 





17 



32 



50 



63 



Word 2 



SIOIND 



SINTAD 
Address at which interrupt 
occurred when unstacking 



12 



32 



50 



57 



63 



Word 3 



STOELO 
Address table of exits presently 
attached to this file 



17 



27 28 29 30 31 



48 49 



63 



Word 4 



sew 

The first control word to be used in the actuation of an 
l-O request 



63 



Words 



SCCW 
Final control word contents if termination interrupt has not been 
processed or the final control word from the channel if the interrupt 
has occurred 



Word 6 



63 





SORARC 




SMXARC 






Arc address for begin- 




Maximum ad- 






ning of disk request set 




dress allowed for 






by I-O assignment 




disk request 





17 



38 



49 



63 





SCUARC 

Address of the last 
used arc for this file 





Word 7 

6 

Figure 140. File Area Table 



17 



63 
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Bits Symbol 

2.29-2.31 SREELD 



Content 

This field contains the code for disposition of tape reels 
at $FREE time or at $EOJ time. It is set by the I-O 
assignment routine, and tested by $rREE. 

000 - Do not save NSAVE 

001 - Save if job complete CSAVE 
010 - Save if job incomplete ISAVE 

Oil - Save in all cases SAVE 



2.48 - 2.49 



SFMODE 



This field contains the mode specified on the lOD card. 
It is set by the 1-0 assignment routine and tested by the 
actuator. 



3.00 - 3.63 



4.00 - 4.63 



sew 



SCCW 



This field contains the first control word to be used in 
the actuation of an 1-0 request. It is set by the control 
word checking routine and is used by the actuator. 

This field contains the first control word used in the 
actuation of an I-O request if the interrupt for the termi- 
nation of that request has not been processed, or it 
contains the final control word contents if the interrupt 
has been processed. The field is set by the control word 
check routine or by the receptor. It is used by the $CCW 
routine. 



5.06 - 5.17 



5.38 - 5.49 



6.06 - 6.17 



SORARC 



SMXARC 



SCUARC 



This field specifies the arc address for the beginning of 
the disk request setup by I-O assignment. It is tested 
by the actuator. 

This field specifies the maximum allowable arc address 
for the disk request, set up by I-O assignment. It is 
tested by the actuator. 



This field specifies the last used arc for this file. It is 
set by the locate routine or the receptor, and is tested 
by the actuator. 
Bits not specified are not used. Symbols are defined relative to the location of the table e. g. , 
SIODRN SYN(BU, 18), 0.0 . 

THE SYMBOLIC I-O LOCATION TABLE 

There are two symbolic I-O location tables: one for MCP, and one for PP. The MCP symbolic 
I-O location table is constructed in MCP core at IPL time by the initialization program from the 
MCP lOD cards. The PP symbolic I-O location table is constructed at job control time from the 
PP lOD cards. 

The tables are identical in format and usage. There is one entry for each lOD reference number 
(lODRN) specified on the lOD cards, and the entry position is the same as the lODRN- The address 
of the unit area table assigned to the lODRN is entered in the VF of the first half word, and the 
address of the file area table assigned to the lODRN in the VF of the second half word. 
_Q 23 32 ?,^, 



Address of Unit Area 
Table 



Address of File Area 
Table 



Format of Symbolic I-O Location Table 
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The base addresses of the two I-O location tables are contained in the value fields of the half 
words at SBAPP and SBAMCP, for PP and MCP respectively. 

THE REEL POOL TABLE 

The reel pool table consists of one full word entry for each reel which is requested by the 
problem program. The table is set up at job control. Its format is as follows: 



Bits 



.00 



,17 



Symbol 
SNEXRL 



Content 

Address of the next reel table entry for the same unit. 
It is zero if no more reels are to be mounted. 



.25 



SRENTY 



Entry in table indicator. 

- No entry 

1 - Entry 



.26 



SREPR 



Reel protected indicator. 

- not protected 

1 - protected 



.27 



SRELB 



Reel labeled indicator. 

- not labeled 

1 - labeled 



.34 



,63 



SRENME 



Reel name in A6 code. 
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APPENDIX B - FLOW CHART STANDARDS 



The seven functional symbols used to represent 
logical groupings of instructions on the flow charts 
are as follows: 

Processing 



A brief statement of an opera- 
tion or function is in the 
block. A processing block may* 
have multiple entries but only » 
one exit. 



»»«»»»««»««■»*««« If 



Subroutine 

The primary function of this ^ , 

block is to represent a complex *-»-»-•-»-»-♦-»-• 
logical program unit without ^ , 

undue detail. The name of the * » 

program symbol, taken directly 
from the code, is printed in the upper section of the 
block, above the broken line. A brief description of 
the usage of the subroutine is printed in the lower 
section. A subroutine block may have multiple 
entries and multiple exits. The exits are labeled 
when necessary. 

Decision 



Brief statements of comparison, •♦♦»» 

decision, choice or tests are » , 

printed in this block in the form ^ 
of a question. A decision « » 

block may have multiple entries »»»»» 

and has multiple exits. The exits are always labeled 
to show the paths of flow available for the various 
conditions labeled. 



Modification 



A brief statement of internal 
modification to program instruc- 
tions is printed in this block. 
A modification block may have 
multiple entries but has only 
one exit. 



»♦••*•»»••» 



« * 

• « 



Input/Output (I-O) 

A brief statement of I-O func- 
tion is printed in this block. 
An I-O block may have multiple « 
entries and multiple exits. The* 
exits are labeled when neces- 
sary. 

Logical Connectors 



»«••••»••••«• 






Connectors are represented by j^ T* * ** 
a circle. All connectors used » « 

in the MCP flow charts have * * 

logical significance in terms of « « 

program flow. The names » » « » » 

used are program symbols as found in btranch 
addresses in the code. 

A connector may be an entry connector, an exit 
connector, or both. Any program symbol can be 
used at most once in an entry connector. An entry 
connector has only one exit, and may or may not 
have entries. The symbol used in an entry connector 
is the symbol used to start the corresponding section 
of code. 

An exit connector may have multiple entries. If 
it has an exit, it is also an entry connector and the 
symbol used will not be used elsewhere as an entry 
connector. The symbol used in an exit connector 
may be used in other exit connectors. 

When a phrase such as ENTER ROUTINE, repre- 
sented in the code by BR, 0.0 ($XR) is used in an exit 
connector, the actual branch point is computed (for 
instance, a branch table). When $RET appears as 
an exit connector, the pseudo-op is being used to 
determine subsequent flow. (See the Return Routine.) 

Halt 



A brief statement of the condi- 
tion of the halt or an appropriate 
exit is printed in this block. # 

A halt block may have multiple 
entries. A halt box with an exit 
implies external intervention (interrupt or operator) 
to utilize the exit. 



»»»»«*»»«««»«»)). 



«»«■»»»«*&«»»»«» 
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The general flow on the charts proceeds to the On some of the charts a program symbol from the 

right and/or down. The functional symbols are code is printed to the left and above the functional 

logically linked by the use of flow lines, represented symbol to help the reader relate the flow chart to 

by dotted lines terminating in arrowheads (printed as the code. Sometimes a line of text is printed in the 

X) showing the direction of the flow. Arrowheads vicinity of a block as an aide to the reader. All sym- 

are always placed at the point of entry to a functional bols referred to in any of the blocks are taken 

symbol and at junctions with major flow lines. directly from the program. 
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APPENDIX C - THE IBM 7030 MULTIPLIER 
REGISTER 



K2 and subsequent machines contain in the E-box a 
transistor register used as a floating point multiplier 
register ($MR) . This register is not available on 
X-1 (LASL), the 7950, or K-1 (LRL). 

The fraction and sign bits of $MR occupy the last 
52 bits of the D register in the arithmetic unit. Its 
exponent occupies $R.48 through $R.59. The multi- 
plier register has no address and can be referred to 
only through floating point instructions LMR, STM, 
and *+. The instruction LMR loads $MR in the same 
way as LET loads $FT on the K-1 machine; similarly, 
*+ behaves in the same way as the corresponding 
instruction in K-1, but $MR instead of $FT will 
furnish the implied operand. Bit configurations for 
LMR and LET are the same (10010) , as are bit 
configurations for *+ and its corresponding instruc- 
tion (OHIO). The floating point instruction Store 
Multiplier (STM) with bit configuration 11110, stores 
the contents of $MR into the full word specified by 
the effective address, and is added to K-2 and sub- 
sequent machines. On these machines LMR, *+, and 
STM are capable of being modified by modifier bits , 
as are other floating point instructions. These new 
instructions occupy only one level of the lookahead 
rather than two, as do the original corresponding 
instructions . 



VFL instructions are unaltered, but $MR, aside 
from its shared $R bifs, is part of the VFL accumu- 
lator and is on the path of data flow for some VFL 
instructions. Thus: 

1. VFL fetch type instructions with offset less than 
16 will alter the exponent bits of $MR. The corres- 
ponding store type instructions may store $MR expo- 
nent bits. 

2. VFL load (L) and load with flag (LWF) auto- 
matically clears the $MR exponent to all zeros before 
the loading operation. 

3. The fraction and sign byte parts of $MR are 
replaced whenever a VFL instruction calling for word 
boundary crossover is executed, because the D regi- 
ster is needed in all such cases to house the second 
full word temporarily. 

4. Due to bit-sharing with $R, the $MR exponent 
will be altered by a VFL instruction which changes 
the sign of the accumulator. 

MCP saves and restores $MR along with other low 
registers. It takes the precaution of resetting $OP 
in the event the machine has no multiplier register. 
Note that by using the $MR option, arithmetic time in 
matrix multiplication can be cut in half as compared 
with the corresponding $FT operation. 
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APPENDIX D - CONNECTOR INDEX 



PART 1 - MCP 
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ABCARD 

ADCARD 

AEDUMP 

AEOJ 

AFLOW 

AFPCRD 

ALD8-4.C 

ALDB 

ALDADJ 

ALOADR 

AOCTL 

APCARD 

APUMP8 

ARBOCD 

AR3NCD 

ARET 

ARNORM 

ARNRMl 

ARNRM5 

ASPUO 

ASUPERT 

ASWCH 

ATCARD 

ATPACS 

Aipacs 

ATSWC2 
ATSWC5 
ATStfCH 
AWDUMP 

BCCWR 

aCWCR 

dFAT 

BKLNRT 

SRUFRT 

BRLNRT 

BTIFRT 

CA0S3A 

CARCAD 

CCHEX 

CORY 

CDRYl 

CFETCH 

CINTER 

CPRERD 

CRETN 

CRETPP 

CSTART 

CT 

CT&2.0 

EELC 

EWMOOE 

EWRIKI 

EWR31 

Ewn 

JCNCS 

JCOMD 

JCOMM 

JDISCK 

JEOF 

JEOJ 

JEOJX 

JEXITD 

JGETOF 

JHARD 

j:>10RCW 

JNEUT 

JNEWTE 

JNOPX 

JOUTP 

JRWRIT 

JTSTEX 

JUNRL 

JWLODE 

JWRITL 

JZIOR 

<CBJ 

KC8J1 

K.CLEAR 

KCOPY 

KDENST 

KELOOP 



THE 
THE 
THE 
THt 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
■ THE 
THE 
THt 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
THE 

THE 
THE 
THE 
THE 
THE 
THE 
THE 

THE 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
THE 

THE 
THE 
THE 
THE 
THE 

THE 
THE 

THE 
THE 
JOB 
JOB 
JOB 
THE 
THE 
THE 
THE 
THE 
THE 
THE 
JOB 
THE 
THE 
THE 
THE 
THE 
THE 

THE 
THE 

THE 
THE 
THE 
THE 



MCP LOAObR-CHART 1 

MCP LOADER-CHART 3 

SEDUMP PROGRAM ' 

OUTPUT EOJ AND OUTPUT COMMAND PROGRAM 

MCP LOADER-CHART 2 

2 

2 

2 

1 

1 

3 

3 



41 

MCP LOADER-CHART 2 41 
MCP LOADER-CHART 
MCP LOADER-CHART 
MCP LOAOER^CHART 
MCP LOADER-CHART 
MCP LOADER-CHART 
MCP LOAD.ER-CHART 

IDUMP PROGRAM 117 

MCP LOADER-CHART 2 41 

MCP LOADER-CHART 2 41 

SYSTEM PRINT AND PUNCH PROGRAM 85 

MCP LOADER-CHART 2 41 

MCP LOADER-CHART 1 40 

MCP LOADER-CHART 1 40 

SYSTEM PRINT AND PUNCH PROGRAM as 

MCP LOADER-CHART 1 40 

SYSTEM PRINT AND PUNCH PROGRAM 35 

MCP LOADER-CHART 1 40 

OUTPUT TAPE SWITCH ROUTINE 84 

OUTPUT TAPE SWITCH ROUTINE g4 

OUTPUT TAPE SWITCH ROUTINE 84 

OUTPUT TAPE SWITCH ROUTINE 84 

OUTPUT TAPE SWITCH ROUTINE 84 

IDUMP PROGRAM 117 

COPY CONTROL WORD ROUTINE '2 

CONTROL WORD CHEC< ROUTINE M 

COPY CONTROL WORD ROUTINE « 

UNIT LIGHTS AND GONG ROUTINES * 

UNIT LIGHTS AND GONG ROUTINES " 

UNIT LIGHTS AND GONG ROUTINES * 

UNIT LIGHTS AND GONG ROUTINES « 



SYSTE:m PRINT AND PUNCH PROGRAM 

RECEPTOR-CHART 't 

CHEX AND lODEF ROUTINES 

OUTPUT EOJ AND OUTPUT COMMAND PROGRAM 

OUTPUT EOJ AND OUTPUT COMMAND PROGRAM 

DISK FETCH PACKAGE 

DISK FETCH PACKAGE' 

DISK FETCH PACKAGE 

RETURN ROUTINE-CHART 1 

RETURN ROUTINE-CHART 2 

SYSTEM PRINT AND PUNCH PROGRAM 

DISK FETCH PACKAGE 

DISK FETCH PACKAGE 

RELEASE, FEED CARD, ERASE GAP ROUTINES 

WRITE ROUTINE 

WRITE ROUTINE 

WRITE ROUTINE 

WRITE TAPE MARK ROUTINE 



85 
10 
111 



COMMAND Mainstream 

COMMAND ,'iAINSTREAM 

commentator-chart 1 
control word check routine 
control i/o commands 
control i/o .commands 
control i/o commands 

COMMElvTATOR-CHART 2 

I/O INDICATOR CHECK RUUT INE-CHART 

COMMAND I'iAlNSTREAM 

CONTROL WORD CHECK ROUTINE 

I/O INDICATOR CHEuK ROUTINE-CHART 

I/O INDICATOR CHECK ROUTINE-CHART 

COMMAND MAINSTREAM 

CONTROL I/O COMMANDS 

I/O INDICATOR CHECK ROUTINE-CHART 

COMMENTATOR-CHART 2 

I/O INDICATOR CHECK ROUTINE-CHART 

MASKABLE INTERRUPT ROUTINE 

I/O INDICATOR CHcCK ROUTINE-CHART 

CHEX AND lODEF ROUTINES 

I/O REJECT ROUTINE 

I/O REJECT ROUTINE 

I/O REJECT ROUTINE 

RECEPTOR-CHART 1 

CHECK DENSITY, CHlCK iOJi ,%OJTI.iE; 

RIO AND i-.'HlT ROJTI\ES 



47 
47 
114 
99 



115 
109 
47 
99 
IIR 
109 
4/ 
SO 
110 

lis 

110 

4 

110 

111 

106 
105 

105 
6 

104 
113 



KFILK-l.U 


THE 


KFREE 


THE 


KFRONT 


THE 


KGATE 


THE 


KHEX 


THE 


KILE6L 


THE 


KINTTY 


THE 


KIOIND 


THE 


KKFDEN-1.0 


THE 


KKFDENt4.0 


THE 


KKLOC 


THE 


KKLO-C&2.0 


THE 


KKLOOP 


THE 


KKSPAC 


THE 


KLOCAT 


THE 


KMODE 


THE 


KMOON 


THE 


KNEWT 


THE 


KN050 


THE 


KNORM 


THE 


KNSYST 


THE 


KOPOK 


THE 


KPASS 


THE 


KPUNT 


THE 


KOIN 


THE 


KREPET 


THE 


KRETRY 


THE 


KRIO 


THE 


61*^6^ 


THE 

Ihe 


KRREAD 


THE 


KRWEF 


THE 


KSEOPT 


THE 


KSERCH 


THE 


KSIGNL 


THE 


KSLOC 


THE 


KSPTM-1.0 


THE 


KSPTM 


THE 


KS'rORE 


THE 


KSUPP 


THE 


KUNLOl 


THE 


KUNR 


THE 


KUNSTC 


THE 


KWAIT 


THE 


KWLABL 


THE 


KWLTMK-1.0 


THE 
L 

THE 


LDECOD 


MBSY 


THE 


MCOMO 


THE 


MIOREJ 


THE 


MPPBSY 


THE 


MRETAD 


THE 


NSTACK 


THE 


MTCl 


THE 


MTC2A 


THE 


MTCL 


THE 


MUPl 


THE 




P 


PBO 


THE 


PCONEl 


THE 


PCONE-2 


THE 


PCSRD 


THE 


PD81 


THE 


PDBBEG 


THE 


PDUM 


THE 


PEl 


THE 


PE* 


THt 


PERREX 


THE 


PHOLD 


THE 


PINC 


THE 


PPPRET 


THE 


PSTR 


THE 




R 


Rl 


THE 


RCNXRJ 


THE 


RCREJB 


THE 


RCSCS 


THE 


RCUKNG 


THE 


RDNOTP 


THE 


RDSWTC 


THE 


RDUK 


THE 


READ 


THE 


RE3SFL 


THE 


RE6SP1 


THE 


RECRWT 


THE 


REDOBL 


THE 


REDUMP 


THE 


REuO 


TmE 


RtJTFT 


THE 



SPACE LABEL ROUTINE 

RECEPTOR-CHART 2 

IDENTIFIER 

RECEPTOR-CHART 2 

RECEPTOR-CHART 3 

LOCATE ROUTINE 

RECEPTOR-CHART 2 

I/O INDICATOR CHECK ROUTINE-CHART 1 

WRITE LABEL ROUTINE 

WRITE LABEL ROUTINE 

LOCATE ROUTINE 

LOCATE ROUTINE 

I/O REJECT ROUTINE 

I/O INDICATOR CHECK ROUTINE-CHART 1 

LOCATE ROUTINE 

CHECK DENSITY, CHECK MODE ROUTINES 

LOCATE ROUTINE 

I/O INDICATOR CHECK ROUTINE-CHART 1 

IDENTIFIER 

RECEPTOR-CHART 2 

SPACE LABEL ROUTINE 

IDENTIFIER 

RIO AND WAIT ROUTINES 

RECEPTOR-CHART 3 

RECEPTOR-CHART 2 

I/O INDICATOR CHECK ROUTINE-CHART 1 

I/O REJECT ROUTINE 

RIO AND WAIT ROUTINES 

UNLOAD AND REWIND ROUTINES 

I/O INDICATOR CHECR ROUTINE-CHART 1 

I/O INDICATOR CHECK ROUTINE-CHART 1 

I/O INDICATOR CHECK ROUTINE-CHART 2 

Stop TEST ROUTINE 

RECtPTOR-SEARCH AND UNSTACK ROUTINES 

RECEPTOR-CHART 3 

LOCATE ROUTINE 

SPACE LABEL ROUTINE 

SPACE LABEL ROUTINE 

RECEPTOR-CHART 1 

RECEPTOR-CHART 4 

UNLOAD AND REWIND ROUTINES 

I/O REJECT ROUTINE 

RECEPTOR-SEA-RCH AND UNSTACK ROUTINES 

RIO AND WAIT ROUTINES 

WRITE LABEL ROUTINE 

WRITE LABEL ROUTINE 

DECODE ROUTINE 

COMMENTATOR-CHART 1 
COMMENTATOR-CHART 1 
I/O REJECT ROUTINE 
COMMeNTaTOR-CHART 1 
COMMENTATOR-CHART 1 
COMMENTATOR-CHART 2 
IF ANALYSER 
IF ANALYSER 
COMiIEnTATOR-CHART 1 
RETURN ROUTInE-CHART 1 



CONSOLE DE 
CONCEPTOR- 
CONCcPTOR 
CONCEPTOR- 
CONSOLE DE 
CONSOLE DE 
iHOLD ROUT 
CONSOLE DE 
CONSOLE DE 
CONClPTOR-i 
SHOLD ROUT 
SHOLD ROUT 
CONCEPTOR-i 
CONSOLE OE 



BUGGING PACKAGE 

CHART 1 

CHART 1 

CHART 1 

BUGGING PACKAGE 

BUGGING PACKAGE 

INE 

BUGGING PACKAGE 

BUuGING PACKAGE 

CHART 1 

INE 

INE 

CHART 1 

BUGGING PACKAGE 



SPACE ROUTINE 

INPUT UK FIXUP-UK ON CARD SRD-CHART 2 
INPUT OK FIXUP-UK ON CARD iRD-CHART 2 
INPUT UK FIXUP-UK ON CARD SRD-CHART 1 
INPUT UK FIXUP-UK ON CARD »RD-CHART 2 
INPUT UK FIXUP-UK ON CARD SRD-CHaRT 1 
INPUT UK FIXUP-PROGRAM RECOVERY 
INPUT UK FIXUP-UK ON SRD-CHART 1 
INPUT UK FIXUP-UK ON SWEF AND Sw 
INPUT UK FIXUP-ERG PROCEEDURE-CHART 1 
INPUT UK FIXUP-UK ON SWEF AND SW 
INPUT UK FIXUP-ERG PROCEEDURE-CHART 2 
INPUT U< FIXUP-ERG PROCElDURE-CHART 1 
INPUT UK FIXUP-ERG PROCEEDURE-CHART 1 
INPUT JK FIXUP-ERG PRQCttDURE-CHART 2 
I\PUT ^KOGRAri-TRAiMSlTlON SUBKOUTTNtS 



103 
7 



8 
94 



107 
102 



94 
104 

94 



7 
103 



7 
107 
105 
1131 
97 
107 
107 
108 
106 



94 

103, 

103 

6 

10 

97 
105 
9 
113 
102 
102 



114 
105 
114 . 
114 
115 

17 

17 
114 

21 



119 
119 
118 
119 
119 
11 
118 
118 



96 
79 
79 
78 
79 
78 
83 



77 
76 
76 
77 
73 



264 



RENDTR 

RERDUK 
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